Extraction des noms de feuille Fermé

Question

bonjour a tous,Je cherche a extraire en vba le nom des feuilles d'un groupe de travail. Un grand merci a celui(celle) qui voudra bien s'atteler au problème.M

Fada09 · Answer

Salut,
Désolé je sais que la réponse est un peu tardive mais je lisais les anciens messages sans réponses et je suis tombé sur le tien.
Le nom de la feuille courante s'appelle activesheet.name.

J'espère que c'est pas trop tard et que ma réponse correspond à ta question.

;-)
~ ~ Fada ~ ~ : Member of Star!alco

MOI · Answer

ça peu t'aider
http://www.commentcamarche.net/forum/affich-424613-VBA-Lister-toute-les-feuilles-dans-une-combo

ça pour lister les noms de feuilles dans une zone de liste modifiable :

Sub UserForm_Initialize()
For i = 1 To ThisWorkbook.Sheets.Count
ComboBox1.AddItem (ThisWorkbook.Sheets(i).Name)
Next i
End Sub

pour lister les noms de feuilles dans les cellules A1 jusqu'à A(nombre de feuilles)

Sub noms_de_feuilles()
For i = 1 To ThisWorkbook.Sheets.Count
Cells(i, 1).Activate
Cells(i, 1).Value = ThisWorkbook.Sheets(i).Name
Cells(i + 1, 1).Activate
Next i
End Sub
évidement tu peux choisir la cellule de votre choix pour commenser le listing des feuilles

MOI · Answer

pardon il y a une petite erreur , le deuxième listing est :

pour lister les noms de feuilles dans les cellules A1 jusqu'à A(nombre de feuilles)

Sub noms_de_feuilles()
For i = 1 To ThisWorkbook.Sheets.Count
Cells(i, 1).Activate
Cells(i, 1).Value = ThisWorkbook.Sheets(i).Name
Next i
End Sub

kiki · Answer

bjr a tous je cherhce des 
photos de mohanad

Extraction des noms de feuille

4 réponses

Discussions similaires