Le nom de la feuille dans une cellule VBA excel
lecoyote94
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
Gyrus Messages postés 3334 Date d'inscription Statut Membre Dernière intervention -
Gyrus Messages postés 3334 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Ma modeste contribution pour inscrire le nom de toute les feuilles dans la cellule B1.
Sub NomFeuille()
Dim Ws As Worksheet
'Active la première feuille du classeur.
Sheets(1).Activate
'Boucle sur les feuilles du classeur.
For Each Ws In Worksheets
'Active la feuille et Inscrit sont nom dans la cellule [B1].
Ws.Activate
[B1] = ActiveSheet.Name
'Passe à la feuille suivante.
Next Ws
'Reviens à la première feuille du classeur.
Sheets(1).Select
'Fin de la procédure.
End Sub
Ma modeste contribution pour inscrire le nom de toute les feuilles dans la cellule B1.
Sub NomFeuille()
Dim Ws As Worksheet
'Active la première feuille du classeur.
Sheets(1).Activate
'Boucle sur les feuilles du classeur.
For Each Ws In Worksheets
'Active la feuille et Inscrit sont nom dans la cellule [B1].
Ws.Activate
[B1] = ActiveSheet.Name
'Passe à la feuille suivante.
Next Ws
'Reviens à la première feuille du classeur.
Sheets(1).Select
'Fin de la procédure.
End Sub
A voir également:
- Le nom de la feuille dans une cellule VBA excel
- Aller à la ligne dans une cellule excel - Guide
- Verrouiller cellule excel sans verrouiller la feuille - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Excel cellule couleur si condition texte - Guide
- Liste déroulante excel - Guide
