View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
billy billy is offline
external usenet poster
 
Posts: 4
Default run macro in book1 from book2 - how?

Well, I did finally find one thing that worked:

Sub runMacro()
Workbooks.Open("Book1.xls")
Application.Run "Book1.xls!Test"
End Sub

But isn't there a way to run this from a workbook object?

Set bk = Workbooks("Book1.xls")
bk.Application.run "Test" 'which obviously not working


-----Original Message-----
Hi,

I have a macro in book1 (just a test macro)

sub test()
Sheets("Sheet1").Range("A1") = "this is a test"
End Sub

But I want to run this macro from book2. Here is what I
tried that did not work from book2

Sub runMacro()
Dim bk As Workbook
Set bk = Workbooks.Open(ThisWorkbook.Path & "\book1.xls")
bk.Application.Run "Test"
End Sub

I get the error message that it can't find "Test". Could
someone share the correct syntax for this?

Thanks
.