Discussion :

[Martin_77]

Bonjour,

J’ai une macro qui liste les modules correspondant aux feuilles.
En fait, ma macro est plus compliquée car je liste aussi le nom des différentes procédures et fonctions dans une feuille et non dans la fenêtre d’exécution mais j’ai simplifié pour la compréhension de ma question.

Code :

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

1
2
3
4
5
6
7
8
9
 
Private Sub ListeModulesDesFeuillesExcel()
Dim vcomp As Object
    For Each vcomp In ThisWorkbook.VBProject.VBComponents
        If Left(vcomp.Name, 5) = "Feuil" Then
            Debug.Print vcomp.Name
        End If
    Next vcomp
End Sub

Les noms des modules sont les noms des feuilles qui ont été donnés par le système.

Dans ma liste, je souhaite avoir aussi le nom de la feuille tel qu’il a été renommé dans Excel

Quelle est la propriété qui permet d’avoir le nom de l’onglet associé au nom de la feuille donné par le système ?

Merci d’avance de vos réponses

[Gorfael]

Salut Martin_77 et le forum
sheets(x).Name
Mais il serait plus profitable d'expliquer ton but (à moins que ce ne soit purement le besoin de lister).
A+

[Martin_77]

Bonjour, merci pour ta suggestion mais elle ne correspond pas à mon besoin.

Voici mon but :

En fait, ma macro est plus complexe que le code que j’ai indiqué. Elle permet aussi de lister les noms de toutes les procédures et fonctions contenues dans chaque module.

Pour le nom de chaque module correspondant à une feuille j’aimerais indiquer à la fois le nom donné par le système et le nom qui a été donné à la feuille dans Excel.

[Jean-Philippe André]

salut,
si cette discussion peut t'inspirer, sait-on jamais