Signaler

Afficher liste onglets si Stock [Résolu]

Posez votre question surplus 639Messages postés mardi 17 août 2010Date d'inscription 12 novembre 2017 Dernière intervention - Dernière réponse le 12 nov. 2017 à 23:12 par surplus
Bonjour,

je voudrais afficher une liste des feuilles de mon classeur en colonne A dont la valeur en case "A2" de chaque feuille serait ="Stock" et case "B2" afficher valeur de la case "G16" de chaque feuille
par macro je pense a l'ouverture de la feuille nommée "Stock"
merci de votre aide
Slts               A bientôt 
Surplus
Utile
+0
plus moins
Bonsoir

Poste un exemple de ton fichier sur mon-partage.fr, fais créer un lien que tu copies et reviens coller ici, qu'on puisse avoir une base de travail pour t'aider

Cdlmnt
Via
Donnez votre avis
Utile
+0
plus moins
bonsoir
voici le lien de mon fichier
http://www.cjoint.com/doc/17_11/GKmvRHZb8ZK_Gestion.xls
Donnez votre avis
Utile
+0
plus moins
Re,

Voilà la macro à mettre dans le worsheet de la feuille Stock :
Private Sub Worksheet_Activate()
x = 1
For n = 1 To Sheets.Count
If Sheets(n).Range("A2") = "Stock" Then
x = x + 1
Range("A" & x) = Sheets(n).Name
Range("B" & x) = Sheets(n).Range("G16")
End If
Next
End Sub

Cdlmnt
Via
surplus 639Messages postés mardi 17 août 2010Date d'inscription 12 novembre 2017 Dernière intervention - 12 nov. 2017 à 23:12
Re
Merci c'est excellent
Cdlmnt

surplus
Répondre
Donnez votre avis

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !