For a macro named "myMacro" in a workbook named "myWorkbook.xls", something
like this would work:
Sub RunXLmacro()
Dim xlApp As Excel.Application
Dim xlWkbk As Excel.Workbook
Set xlApp = New Excel.Application
Set xlWkbk = xlApp.Workbooks.Open("C:\temp\myWorkbook.xls")
xlApp.Run "myMacro"
xlWkbk.Close SaveChanges:=True
xlApp.Quit
Set xlWkbk = Nothing
Set xlApp = Nothing
End Sub
Steve