lister les onglet sur une feuille avec maj

S

so

Guest
Bonjour je voudrais lister tous les titres de mes onglets (62) sur une feuille et pouvoir le mettre à jour quand besoin
merci par avance
So :)
 

sigma

XLDnaute Occasionnel
so, le forum,

merci de rester sur le même fil afin que chacun retrouve ses petits, tu as une partie de la réponse dans celui du 18/08 que d'ailleurs tu sembles avoir abandonné.

Lien supprimé

un petit coup d'oeil à la charte peut être...

A+
 
S

so

Guest
peut etre peux tu m'aider, j'ai ça:

Sub MajIndex()
Application.EnableEvents = False
Dim k%
k = 2
On Error Resume Next
For i = 2 To 10 Step 2
For j = 11 To 30
Cells(j, i).Value = WsName(k)
Cells(100 + k, 1).Value = WsName(k)
k = k + 1
Next
Next
Application.EnableEvents = True
End Sub

mais ça me met tout sur 3 colonnes avec une colonne vide entre deux, je voudrais tout en continu

pi j'ai ce ça
Function WsName(i As Integer)
WsName = Worksheets(i).Name
End Function
qui a peut etre un lien avec la maj???

Par avance merci de ton aide
 

Discussions similaires

Statistiques des forums

Discussions
312 165
Messages
2 085 883
Membres
103 013
dernier inscrit
cicro