ci sono riuscito
filePath = "c:\Test1.xls"
Set xl = CreateObject("Excel.Application")
XL.Visible = True
xl.Workbooks.Open(filepath)
xl.Run "macro1"

però in questo modo mi apre un secondo file excel a me serve che mi avvii la macro con file excel gia aperto...chi mi aiuta?