View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Steve[_84_] Steve[_84_] is offline
external usenet poster
 
Posts: 2
Default Need syntax for RUNning a Word macro with an argument, called from an Excel macro



' IN EXECUTING A WORD MACRO FROM AN EXCEL MACRO USING AUTOMATION,
' WHAT IS THE SYNTAX FOR PASSING ARGUMENTS TO THE WORD MACRO?


'From EXCEL macro

Set oWord = GetObject(, "Word.application")
oWord.Visible = True
oWord.WindowState = wdWindowStateMinimize

' works when no argument present

oWord.Run MacroName:="MyWordMacro1"


' does NOT work with argument using this syntax

oWord.Run MacroName:="MyWordMacro1" arg1

-------------------------------------------------------------------------------------
WORD macros

Sub MyWordMacro1()
'
' macro code
'
end sub

Sub MyWordMacro2(arg1 As String)
'
' macro code
'
end sub