STOCKER LE NOM D UNE FEUILLE DANS UNE VARIABLE

sandrine_nelly Messages postés 41 Date d'inscription vendredi 11 mars 2005 Statut Membre Dernière intervention 31 janvier 2008 - 6 avril 2005 à 18:01
gladiarotor Messages postés 6 Date d'inscription mercredi 8 septembre 2004 Statut Membre Dernière intervention 16 août 2005 - 2 août 2005 à 19:12
Bien que plusieurs d'entres vous m'ont déjà aidé, je n'arrive toujours pas à

STOCKER LE NOM D UNE FEUILLE DANS UNE VARIABLE

LE CODE est le suisvant eet il ne fonctionne pas:

NOM_FEUILLE = Sheet.name


For Each Sheet In ActiveWorkbook.Sheets
MsgBox NOM_FEUILLE
Next

3 réponses

valtrase Messages postés 937 Date d'inscription lundi 19 janvier 2004 Statut Membre Dernière intervention 9 mai 2022 3
6 avril 2005 à 19:10
Salut,
Dim NOM_FEUILLE as string

For Each Sheet In ActiveWorkbook.Sheets
NOM_FEUILLE = Sheet.name
MsgBox NOM_FEUILLE
Next
ou
'For Each Sheet In ActiveWorkbook.Sheets
' MsgBox Sheet.Name
'Next

Cordialement, Jean-Paul
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partagé
0
valtrase Messages postés 937 Date d'inscription lundi 19 janvier 2004 Statut Membre Dernière intervention 9 mai 2022 3
6 avril 2005 à 19:26
Re,
Je viens de lire ton premier post
si tu veux mettre le nom de toutes tes feuilles dans une variable tu fais

Dim NameFeuil As String , Sheet As Object




For Each Sheet In ThisWorkbook.Sheets


NameFeuil IIf(NameFeuil "" , Sheet.Name, NameFeuil & "; " & Sheet.Name)


Next


MsgBox NameFeuil



Cordialement, Jean-Paul
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partagé
0
gladiarotor Messages postés 6 Date d'inscription mercredi 8 septembre 2004 Statut Membre Dernière intervention 16 août 2005
2 août 2005 à 19:12
MERCI A VOUS
0
Rejoignez-nous