Bonjour,
Je souhaite dans un classeur contenant x onglets pouvoir récupérer la liste de tout ceux-ci dans une feuille nommée récap.
Pour pouvoir réactualiser en cas de nouvelle insertion, la macro serait affectée à un bouton sur lequel leclic déclenche l'exécution de la macro.
çà ne marche pas au clic sur le bouton.
Private Sub CommandButton1_Click()
getNomOnglet()
End Sub
Sub getNomOnglet()
'Macro permettant de lister les onglets d'un classeur
Dim i As Integer
Dim ligne As Integer
Dim colonne As Integer
ligne = 0 'Ligne depuis laquelle on écrit (Commence à 0)
colonne = 1 'Colonne dans laquelle on écrit (Commence à 1)
For i = 1 To Worksheets.Count
Cells(ligne + i, colonne).FormulaR1C1 = Worksheets.Item(i).Name
Next i
End Sub
merci à vous
Je souhaite dans un classeur contenant x onglets pouvoir récupérer la liste de tout ceux-ci dans une feuille nommée récap.
Pour pouvoir réactualiser en cas de nouvelle insertion, la macro serait affectée à un bouton sur lequel leclic déclenche l'exécution de la macro.
çà ne marche pas au clic sur le bouton.
Private Sub CommandButton1_Click()
getNomOnglet()
End Sub
Sub getNomOnglet()
'Macro permettant de lister les onglets d'un classeur
Dim i As Integer
Dim ligne As Integer
Dim colonne As Integer
ligne = 0 'Ligne depuis laquelle on écrit (Commence à 0)
colonne = 1 'Colonne dans laquelle on écrit (Commence à 1)
For i = 1 To Worksheets.Count
Cells(ligne + i, colonne).FormulaR1C1 = Worksheets.Item(i).Name
Next i
End Sub
merci à vous