onglet

[JYB]

Comment afficher le nom de l'onglet dans une celleule de la feuille ???
merci pour vos réponses

 

[omicron]

Bonsoir JYB

Pour afficher le nom de l'onglet de la feuille "Feuil1" dans la cellule "A1" coder :
Range("A1").Value=Sheets("Feuil1").Name

Pour afficher le nom de l'onglet de la 1ere Feuille dans la cellule "A1" coder :
Range("A1").Value=Sheets(1).Name

Pour afficher le nom de l'onglet de la 3ème Feuille dans la cellule "A1" coder :
Range("A1").Value=Sheets(3).Name

Pour afficher le nom de l'onglet de la dernière Feuille dans la cellule "A1" coder :
Range("A1").Value=Sheets(Sheets.Count).Name

Et ainsi de suite ....

Cordialement.

Omicron.

 

[omicron]

Re-Bonsoir JYB

Juste un oubli ....

Pour afficher le nom de l'onglet de la Feuille Courante dans la cellule "A1" coder :
Range("A1").Value=ActiveSheet.Name

Cordialement.

Omicron.