Excel repertoire

Fermé
likalo Messages postés 2 Date d'inscription mardi 4 novembre 2014 Statut Membre Dernière intervention 5 novembre 2014 - 4 nov. 2014 à 15:22
ccm81 Messages postés 10893 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 29 septembre 2024 - 6 nov. 2014 à 16:45
bonjour a tous ,
j'aimerais pouvoir recopier les noms des feuilles sur une autre feuille de calcul
i.e j'ai un document d'environ 60 feuilles ayant chacune un nom different et j'aimerais faire une liste de tous ces noms sur une seule feuille
svp plait a l'aide!
A voir également:

4 réponses

ccm81 Messages postés 10893 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 29 septembre 2024 2 421
4 nov. 2014 à 18:10
Bonjour à tous les deux

J'écrirais plutôt

Dim I As Integer

For I = 1 To Sheets.Count
Sheets("Feuil2").Cells(I, 1).Value = Sheets(I).Name
Next I


Cdlmnt
1
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
4 nov. 2014 à 19:50
Oui bien sûr ccm !
J'étais partie au départ sur une boucle : For Each O In Sheets. Puis j'ai modifié mais sans me relire.
Bien vu et merci !
0
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
Modifié par ThauTheme le 4/11/2014 à 16:40
Bonjour Likalo, bonjour le forum,

Disons que ta feuille de destination est Feuil2

Dim I As Integer

For I = 1 To Sheets.Count
Sheets("Feuil2").Cells(I, 1).Value = O.Name
Next O
...

À plus,
Thautheme
0
likalo Messages postés 2 Date d'inscription mardi 4 novembre 2014 Statut Membre Dernière intervention 5 novembre 2014
5 nov. 2014 à 05:09
Merci CCM81 et merci a tous ca marche. seulement je n'arrive pas a sauvegarder toute les 60 feuilles en csv comment vous y parvenez?
0
ccm81 Messages postés 10893 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 29 septembre 2024 2 421
Modifié par ccm81 le 6/11/2014 à 16:45
Pour les enregistrer en csv, si mes souvenirs sont bons, tu dois faire un fichier csv par feuille

Cdlmnt
0