calling macro from External Spreadsheet with parameters

[Roncondor]

I have a macro in spreadsheet "A" that opens Spreadsheet "B"

I need to run a macro within spreadsheet "B"

The catch is that I need to pass a parameter to the macro

The macro is called AddUnits and you need to pass a number to it

I tried both

1) Application.Run = "'" + ActiveWorkbook.Name + "'!Addunits " + "10"

and

2) Application.Run = "'" + ActiveWorkbook.Name + "'!Addunits ," + "10"

and

3) Application.Run = "'" + ActiveWorkbook.Name + "'!Addunits " + "(10)"

but all give error messages!

Thank you

Ron

 

[Fluff]

How about like

Sub Roncondor()
   Dim Wbk As Workbook
   
   Set Wbk = Workbooks.Open(ThisWorkbook.path & "\Book1.xlsm")
   Application.Run "'" & Wbk.Name & "'!Addunits", 5
End Sub

 

[Roncondor]

Thank you so much

Here is a more generic form for others - I could not find this ANYWHERE on the web

Don't forget the single quotes around the file name

Ron

Application.Run = "'" + ActiveWorkbook.Name + "'!MacroName " , Parameter

 

[Fluff]

You're welcome & thanks for the feedback