Discussion :

[NOODLE02]

Bonjour à tous.
Ce n'est pas sans avoir pris la peine de consulter les FAQ's, les sites de Microsoft et autres traitant du sujet que j'en arrive à devoir demander de l'aide.

Mon problème est le suivant : j'essaie en vain de trouver la manière d'extraire le contenu des macros Access depuis VBA.
Il est bien entendu possible d'obtenir un objet AccessObject dans la collection AllMacros, mais à part le nom de la macro, rien d'autre ne semble être disponible

Quelqu'un a-t-il une idée de la manière de procéder pour récupérer la totalité de la description des différentes séquences de la macro ?

[Invité]

Bonjour

Si j'ai bien compris tu veux explorer le code par VBA.
Peut-être que cela te donnera une piste (c'est pour Excel, mais adaptable)

Starec

[NOODLE02]

Merci pour ta réponse, je viens de parcourrir le lien mais ce n'est malheureusement pas adaptable pour Access.

Le problème vient également du fait que la notion de Macro est bien souvent utilisée pour désigner du code VBA. (De ce côté là, pas de problème, il est possible d'ouvrir l'éditeur de code VBA par la propriété VBE de l'objet application et de manipuler tout ce qu'on veut). Mais toutes les recherches dans les aides, les forums, et autres sites aboutissent immanquablement sur la récupération du nom de la macro ou l'accès à l'éditeur de code VBA.

L'aide de Microsoft donne le code suivant, mais ne donne pas plus d'explications sur le reste de la structure de la macro.

"L'exemple suivant imprime le nom de chaque objet AccessObject ouvert dans la collection AllMacros.

Sub AllMacros()
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentProject
' Search for open AccessObject objects in AllMacros collection.
For Each obj In dbs.AllMacros
If obj.IsLoaded = True Then
' Print name of obj.
Debug.Print obj.Name
End If
Next obj
End Sub"

Pourtant, il doit bien y avoir un moyen de récupérer le tout, mais comment ?

En tout cas, merci d'avoir répondu à ma demande.

[Invité]

Re

Ok j'ai vu ce que tu veux, hélas pour les macros je ne sais pas (j'en ai pas besoin, je ne les utilise pas).

Désolé.

Starec

[NOODLE02]

Moi non plus, je ne les utilise jamais, mais je dois bien souvent intervenir dans des applications existantes comportant généralement de nombreuses macros , et pour me faciliter la vie, je suis en train de développer une application complète de documentation techique pour Access.
La solution facile serait de convertir toutes les macros en VBA, mais je ne peux pas me permettre de modifier les DB des clients.

[Maxence HUBICHE]

il existe une méthode non documentée et masquée de l'objet Application qui permet d'exporter les macros vers un fichier texte.

Il s'agit de la méthode SaveAsText

Voici un exemple d'utilisation :

Code :

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

1
2
 
Application.SaveAsText acMacro,"macTest","c:\test.txt"

Si cela peut t'être utile

++

[NOODLE02]

Ben voilà, c'était pas si compliqué mais fallait y penser. En tout cas un grand merci à toi pour ton aide.