Run Excel Macro

[thegameoflife]

How do you run an Excel Macro form Access?

 

[thegameoflife]

I got it.

 Sub EXL()


      Dim XL As Object

      Set XL = CreateObject("Excel.Application")

      XL.Workbooks.Open "C:\Program Files\Office 2K\Office\XLStart\Personal.xls"

      ' If there is more than one macro called TestMacro,
      ' the module name would be required as in
      '
      ' XL.Run "Module1.TestMacro"
      '
      ' to differentiate which routine is being called.
      '
      XL.Run "Test"

 End Sub