Macro to run a Macro

[Kevin]

I have several macros that I want to have executed from a single macro.
I'm used to excel VB where I would just say application.run "Macro1"
But that just returns object does not support this method.

Any help is appreciated...

 

[Kevin]

FYI, I'm using visio 2003 sp2

 

[John]

Hello Kevin,

You need another macro to run the others. So for example:

Public Sub MyCallingProcedure()
Call MyCalledProcedure1
Call MyCalledProcedure2("a useful argument")
End Sub

Private Sub MyCalledProcedure1()
MsgBox "MyCalledProcedure1 was called"
End Sub

Private Sub MyCalledProcedure2(ByRef _
strUsefulArgument As String)
MsgBox "MyCalledProcedure2 was called and was passed " _
& strUsefulArgument & "."
End Sub

Hope that helps.

Best regards

John

 

[Kevin]

Perfect, thank you!!!

Hello Kevin,

You need another macro to run the others. So for example:

Public Sub MyCallingProcedure()
Call MyCalledProcedure1
Call MyCalledProcedure2("a useful argument")
End Sub

Private Sub MyCalledProcedure1()
MsgBox "MyCalledProcedure1 was called"
End Sub

Private Sub MyCalledProcedure2(ByRef _
strUsefulArgument As String)
MsgBox "MyCalledProcedure2 was called and was passed " _
& strUsefulArgument & "."
End Sub

Hope that helps.

Best regards

John