Discussion :

[oiapoque]

Bonjour,

Mes recherches sont vaines (suis-je passé à travers? je m'en excuse d'avance si c'est le cas), mais je recherche la fonction qui me permettrait de Lister les Macros d'une feuille de travail Excel.

Je précise que je ne peux pas passer par le VBProject.

En vous remerciant pour tout indice


Oiapoque

[ouskel'n'or]

Je précise que je ne peux pas passer par le VBProject

Qu'entends-tu par là ? Ici, nous sommes dans le forum VBA-Excel et pour lister les macros d'un projet, on passe nécessairement par VBAProject
Enfin, je crois
(A moins qu'Excel 2007 que je ne connais pas ait la faculté inverse...)

[oiapoque]

Désolé je me suis mal exprimé:

Je cherche à avoir la liste des Macros présentes dans un classeur (celles en Public évidemment) tout en sachant que mon projet VBA est protégé par un mot de passe.

Les solutions que j'ai trouvées nécessitent que le projet VBA soit déprotégé et cela ne convient pas à mon cas.


J'espere avoir été plus clair et précis

Merci de votre attention

[oiapoque]

Pour exemple j'utilise cette macro ci-dessous (dispo dans la FAQ), mais dès que le projet est protégé cela ne fonctionne plus.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Function VerifierExistenceMacro(Wb As Workbook, NomMacro As String) As Boolean
    Dim x As Integer
    Dim vbcomp As VBComponent
 
    For Each vbcomp In Wb.VBProject.VBComponents
        On Error Resume Next
        x = vbcomp.CodeModule.ProcStartLine(NomMacro, 0)
 
        If x > 0 Then Exit For
    Next vbcomp
 
    If x = 0 Then
        VerifierExistenceMacro = False
        Else
        VerifierExistenceMacro = True
    End If
 
End Function

Lorsqu'un projet vba excel est protégé par un mot de passe, on accède tout de même à la liste des macro via le Menu outil->macros->macros.
C'est pour cela que je me demande s'il y a bien une autre façon d'accéder à la liste (la partie Public).

Je continue mes recherches a très bientot. Merci

Oiapoque

[oiapoque]

Etant donné qu'aucune solution ne s'offrait à nous concernant mon problème et ses contraintes, nous avons opté pour une autre solution efficace:

- Dans le source du programme Excel, les noms des macros qu'il comporte apparaissent en clair, nous avons donc écrit une procédure qui recherche le nom de la macro (nous connaissons le nom, nous voulons savoir si elle existe) dans le fichier. si le nom est trouvé la macro existe....