Bonjour,

J'aimerais avoir une petite aide au sujet de mon code.

Ce code permet de lister les onglets. Cependant, je voudrais qu'il commence a lister qu'à partir de l'onget "Modèle"....

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sub lister()
Dim j As Integer
 
z = 4
For j = 1 To Sheets.Count
Cells(z, 5) = Worksheets(j).Name
z = z + 1
Next j
End Sub