Insérer le nom des onglets dans des cellules

Fermé
pamoi - Modifié par pamoi le 5/05/2010 à 21:45
eriiic Messages postés 24513 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 25 mars 2023 - 10 mai 2010 à 18:02
Dans Excel j'ai trouvé comment insérer le mon de l'onglet dans une cellule de cet onglet merci !!

Maintenant allons un peu plus loin:
j'ai les onglets només: s01, s02, s03 ...
pour afficher le nom de ces onglet dans une cellule du même onglet c'Est parfait j'ai la formule.
mais j'ai aussi un ongle sommaire ! dans lequel je fait référence à tous les autre onglets !! j'aimerais bien afficher le nom de tous ces autres onglet dans cet onglet principal !! :O

quelqu'un connait la solution !??

MERCI

3 réponses

snakserge Messages postés 32 Date d'inscription samedi 2 février 2008 Statut Membre Dernière intervention 6 juin 2011 1
5 mai 2010 à 22:48
Sub ong()

Ligne = 0
For onglet = 1 To Sheets.Count
Ligne = Ligne + 1
Cells(Ligne, 1) = Sheets(onglet).Name
Next onglet

End Sub
1
hein je devrais comprendre !?!
0
snakserge Messages postés 32 Date d'inscription samedi 2 février 2008 Statut Membre Dernière intervention 6 juin 2011 1
5 mai 2010 à 23:11
Il s'agit du code de la macro à exécuter
0
gbinforme Messages postés 14939 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 657
Modifié par gbinforme le 5/05/2010 à 23:26
bonjour

Regardes la formule d'Éric qui devrait te donner satisfaction.

Toujours zen
0
j'ai effectivement utilisé la formule d'éric pour les nom respectif des onglets dans une cellule du même onglet ... par contre pour insérer le nom de tous les onglets dans l'onglet sommaire ?? là je me pert vraiment dans toutes ces formules !! vous pouvez me mettre ça plus "pour les nul" un peu??
0
eriiic Messages postés 24513 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 25 mars 2023 7 168
10 mai 2010 à 18:02
Bonjour tout le monde,

Normalement si tu lis tous les mots tu devrais y arriver...

- Créer un nom par 'insertion / nom / définir', par exemple nomFeuilles et dans 'Fait référence à' saisir : =LIRE.CLASSEUR(1)
- en A1 :
=SI(LIGNE()>NBVAL(nomFeuilles);"";STXT(INDEX(nomFeuilles;LIGNE());CHERCHE("]";INDEX(nomFeuilles;LIGNE()))+1;30))
et tirer vers le bas

eric
0