View Single Post
 
Old 07-07-2021, 10:23 AM
chrscote chrscote is offline Windows 7 64bit Office 2010 64bit
Novice
 
Join Date: Aug 2016
Posts: 12
chrscote is on a distinguished road
Exclamation

The problem I'm having is coming from DOORS when I try to run the macro. Here is the code I'm using to run the macro that needs 2 inputs:

Code:
objWord = oleCreateAutoObject("Word.Application");

if(null objWord)
	errorBox("Unable to open word application");

//Open the docm file, insert contents of newly created HTML file and save as .doc
olePut(objWord, "Visible", true);
oleGet(objWord, "Documents", objDocs);
put(autoArgs, sHTMLFileName);
oleMethod(objDocs, "Open", autoArgs, objDoc);

put(macroArgs, nameOfMacro);
put(macroArgs, CMG_USER_DESKTOP);
put(macroArgs, sLastBL);

sErrorMess = oleMethod(objWord, "Run", macroArgs);
if (!null sErrorMess) infoBox(sErrorMess);

//infoBox("Document saved.");
oleMethod(objWord, "quit");
The macro starts out with:
Code:
Sub SaveHTMLAsDoc(sPath As String, sBaseline As String)
Am I adding the macroArgs in the wrong order or is it something else?

Chris
Reply With Quote