Run an Excel Macro

[Marcus Tettmar]

Use this code to open an Excel workbook and run an excel macro contained within it:

Code: Select all

//Put this VBScript block at top of script
VBSTART
Sub OpenAndRun(xlFileName, MacroName)
  Set xlApp = CreateObject("Excel.Application")
  'remove next line to make Excel invisible
  xlApp.visible = true
  Set xlBook = xlApp.WorkBooks.Open(xlFileName)
  xlApp.Run(MacroName)
  'Uncomment next line to quit Excel
  'xlApp.quit
End Sub
VBEND

//Use this line when you want to run the Excel macro:
VBRun>OpenAndRun,c:\files\myexcel.xls,MyMacro