Runs the specified attached macro, module, and procedure.
.NET Syntax
Visual Basic (Declaration) | |
---|
Function RunAttachedMacro( _
ByVal FileName As String, _
ByVal ModuleName As String, _
ByVal ProcedureName As String _
) As Boolean |
Visual Basic (Usage) | |
---|
Dim instance As ISldWorks
Dim FileName As String
Dim ModuleName As String
Dim ProcedureName As String
Dim value As Boolean
value = instance.RunAttachedMacro(FileName, ModuleName, ProcedureName)
|
Parameters
- FileName
- Filename of macro to run (do not include a path)
- ModuleName
- Module of specified macro to run
- ProcedureName
- Procedure of specified macro to run
Return Value
True if macro runs, false if not
Example
Visual Basic for Applications (VBA)
Visual Basic for Applications (VBA)
Create two VBA macros using the following code samples. Attach RunMacroSub.swp to the active document's Design Binder. Then run RunAttachedMacro.swp.
'--------------------------------------
' RunAttachedMacro.swp
'-------------------------------------
Option Explicit
Dim swApp As SldWorks.SldWorks
Dim boolstatus As Boolean
Sub main()
Set swApp = Application.SldWorks
Dim RunMacroError As Long
boolstatus = swApp.RunAttachedMacro("RunMacroSub.swp", "RunMacroSub1", "main")
End Sub
'---------------------------
'---------------------------------------
' RunMacroSub.swp'
'---------------------------------------
Option Explicit
Dim swApp As SldWorks.SldWorks
Sub alternate()
Set swApp = Application.SldWorks
swApp.SendMsgToUser "RunMacroSub1:alternate() called."
End Sub
Sub main()
Set swApp = Application.SldWorks
swApp.SendMsgToUser "RunMacroSub1:main() called."
End Sub
Remarks
See Also
Availability
SolidWorks 2009 FCS, Revision Number 17.0