Afficher liste onglets si Stock

Résolu
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   -  
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   -
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
A voir également:

3 réponses

Réponse 1 / 3
via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
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
0
Réponse 2 / 3
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
 
bonsoir
voici le lien de mon fichier
https://www.cjoint.com/doc/17_11/GKmvRHZb8ZK_Gestion.xls
0
Réponse 3 / 3
via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
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
0
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
 
Re
Merci c'est excellent
Cdlmnt

surplus
0

Discussions similaires

Rechercher un numéro sur liste rouge
pierr-89 -
KARDAN -

4 réponses