List Macro Actions

[George]

Is it possible to list the Actions in a macro (or series
of macros). I know I can use the Tools, Analyze,
Documenter, but I want to list a more limited set of items.
Specifically, I want to show the OpenQuery Action
as "OpenQuery" with a Query Name, and the Comment.
The following code lists the Macros, but I need the
details also. Any suggestions?

Thanks,
George

Function ListMacroActions()
Dim dbs As DAO.Database
Dim box As DAO.Container ' doc
Dim doc As DAO.Document
Set dbs = CurrentDb
For Each box In dbs.Containers
For Each doc In box.Documents
Select Case box.Name
Case "Scripts"
Debug.Print doc.Name, doc.Properties.Count
Case Else
End Select
Next doc
Next box

End Function

 

[Allen Browne]

The Convert Macros to Code might be useful.

Alternatively, try:
SaveAsText acMacro, "MyMacro", "C:\MyMacro.txt"