Copier des onglets sur une feuille avec une macro

roweronly

XLDnaute Nouveau
J'aimerais savoir pendant que je suis sur le site comment copier le nom des onglets dans une feuille du classeur ?

Le code que j'ai fais fonctionne le nom de mon onglet vient se colle sur la deuxième colonne.
Cependant le nom de l'onglet a été copié sur la ligne 5 comment faire pour qu'il se colle directement sur la ligne 1 ?

Le code ;

Dim X As Integer

For X = 5 To Sheets.Count

Cells(X,2).Value = Sheets(X).Name

Next

End Sub

Merci pour vos réponses
:eek:
 

Discussions similaires

Statistiques des forums

Discussions
312 682
Messages
2 090 865
Membres
104 680
dernier inscrit
AvPi26