liste d'onglet

Temjeh

XLDnaute Accro

• 23 Décembre 2006

• #2

Re : liste d'onglet

Bonjour

Si j'ai bien compris ceci liste tes feuilles en col A:

Dim n As Byte
For n = 2 To Sheets.Count
Range("A" & n - 1) = Worksheets(n).Name
Next n


La feuille récapitulation doit être la première car n = 2 To Sheets.Count la pass

A+

Temjeh

 

Dernière édition: 23 Décembre 2006

Vote positif 0 Vote négatif

Dan

XLDnaute Barbatruc

Membre du Staff

Modérateur

• 23 Décembre 2006

• #3

Re : liste d'onglet

Bonjour Bobjazz,

J'espère que tu vas bien.

Vois ce lien dans lequel notre ami Ti avait réalisé une macro sur ce sujet --> VeriTi V 3, le site des amis d'Excel et OOo - Feuille - Afficher nom feuille

A te lire

Edition : Désolé Temjeh. Je pense que la macro que tu proposes correspond encore mieux à cette demande.

 

Dernière édition: 23 Décembre 2006

Vote positif 0 Vote négatif

bobjazz

XLDnaute Impliqué

• 23 Décembre 2006

• #4

Re : liste d'onglet

Bonjour Temjeh et Dan

j'ai oublié le site de Veriti
Sinon Temjeh, je ne vois pas ce que tu veux dire, excuse

Merci robert

 

Vote positif 0 Vote négatif

Dan

XLDnaute Barbatruc

Membre du Staff

Modérateur

• 23 Décembre 2006

• #5

Re : liste d'onglet

Re,

Bobjazz, la macro de temjeh va te mettre dans la colonne A de la feuille 1 toutes les feuilles de ton classeur. La première feuille ne sera, quant à elle, pas mentionnée.

A bientôt

 

Vote positif 0 Vote négatif

Temjeh

XLDnaute Accro

• 23 Décembre 2006

• #6

Re : liste d'onglet

Rebonjour

Ce que je veut dire??

Ce code (macro) fait ce que tu demande! ...voir zip

Ptêtre que tu le veut automatique alors met le dans la feuil sous sélectionchange

A+

Temjeh

 

Pièces jointes

• Liste.zip

  8.9 KB · Affichages: 37
• Liste.zip

  8.9 KB · Affichages: 36
• Liste.zip

  8.9 KB · Affichages: 33

Dernière édition: 23 Décembre 2006

Vote positif 0 Vote négatif

bobjazz

XLDnaute Impliqué

• 23 Décembre 2006

• #7

Re : liste d'onglet

Re Bonjour Dan

Je viens de voir ton lien
mon but, c'est d'afficher en temps réel les noms de chaques feuilles dans une feuille, la premiere qui liste les autres
exempple dans mon fichier
Merci à vous Temjeh et Dan

Bobjazz

 

Vote positif 0 Vote négatif

bobjazz

XLDnaute Impliqué

• 23 Décembre 2006

• #8

Re : liste d'onglet

Re Bonjour Temjeh

Merci, il se met à jour

Passe de Bonnes Fêtes

Bobjazz

 

Vote positif 0 Vote négatif

bobjazz

XLDnaute Impliqué

• 23 Décembre 2006

• #9

Re : liste d'onglet

Excuse Temjeh
Est il possible de mettre le lien dans la colonne A dans chaque nom pour allez directement dans la feuille concerné

Merci de ta patience

Bobjazz

 

Vote positif 0 Vote négatif

Temjeh

XLDnaute Accro

• 23 Décembre 2006

• #10

Re : liste d'onglet

Bonjour

Oui le code est:

Dim n As Byte
For n = 2 To Sheets.Count
Range("A" & n - 1).Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:=Worksheets(n).Name & "!A1", TextToDisplay:=Worksheets(n).Name
Next n

Il sélectionne la cell A1

A+

Temjeh

 

Dernière édition: 23 Décembre 2006

Vote positif 0 Vote négatif

bobjazz

XLDnaute Impliqué

• 23 Décembre 2006

• #11

Re : liste d'onglet

Re Bonjour Temjeh

Merci exactement ca que je voulais

Merci de ta patience

Passe de Bonnes Fêtes

Bobjazz

 

Vote positif 0 Vote négatif

papapaul

XLDnaute Impliqué

• 23 Décembre 2006

• #12

Re : liste d'onglet

😎 Grace a xld j'ai un petit truc
C'est peut être pas ce que tu veux
Mais bon , y a des idées.
@+😉

 

Pièces jointes

• USF choix de feuilles(pour_enr_imp).zip

  17.9 KB · Affichages: 38
• USF choix de feuilles(pour_enr_imp).zip

  17.9 KB · Affichages: 35
• USF choix de feuilles(pour_enr_imp).zip

  17.9 KB · Affichages: 36

Vote positif 0 Vote négatif

bobjazz

XLDnaute Impliqué

• 23 Décembre 2006

• #13

Re : liste d'onglet

Bonjour papapaul

ce n'est pas exactement ce que je voulais, mais ton usf est interessant pour la suite que je veux donner à mon fichier

Merci à tout le monde

bobjazz

 

Vote positif 0 Vote négatif

papapaul

XLDnaute Impliqué

• 23 Décembre 2006

• #14

Re : liste d'onglet

🙂 chu content de rendre service
Bonnes fêtes aux xldeurs🙄

 

Vote positif 0 Vote négatif