Discussion :

[solorac]

Bonjour la Communauté,

Je voudrai savoir comment faire pour éditer dans un nouvel onglet la liste de tous les onglets d'un classeur.

Je vous remercie

Cordialement

[Krovax]

Bonjour
Essaye quelque chose qui ressemble a ca

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub test()
Dim ws As Worksheet
 
For Each ws In Worksheets
Worksheets("Feuil1").Range("A" & Worksheets("Feuil1").Range("A65535").End(xlUp).Row + 1) = ws.Name
Next ws
End Sub

Je te laisse adapter tu peux tassurer que le nom de longlet n'est pas celui ou tu ecris la liste avec un test sur ws.name<>"Feuil1"

[solorac]

Merci pour ta prompte réponse, mais il me mets une erreur :

"objet requis" ???

[Krovax]

Montre le code tel que tu l'as utilisé (copier/coller) précise où tu l'as mis, car le code tel qu'il est donné fonctionne très bien chez moi (et quand tu as une erreur précise sur quelle ligne on peut pas deviner )

[aalex_38]

Bonjour,

Pour que le code que t'a montré Korvax fonctionne, tu dois avoir une feuille nommée "Feuil1", pour les tests tu peux remplacer par la feuille active (
Worksheets("Feuil1") par activesheet)

[solorac]

Autant pour moi.
J'ai commis une erreur (un espace supp) en recopiant le code.
Je préfère le recopier afin de l'assimiler plus facilement.
Mais il fonctionne. Je vous remercie tous les 2