launch macro in other workbook

[pls123]

hi all !!
i have this but it gives error for each "wb"...

For Each wb In Workbooks
If (left(wb.name,1) )= "_" Then
Call mymacro
End if
Next wb

....it is inside a sub that starts like this...

Dim aWB As Workbook
Dim aWS As Worksheet

Set aWB = ThisWorkbook
Set aWS = aWB.Worksheets("Sheet1")


can anybody help pls !!

 

[Per Jessen]

Hi

You have to use the parent object as reference:

For Each wb In Application.Workbooks


Regards,
Per

 

[Przemek]

For Each wb In Workbooks
If (left(wb.name,1) )= "_" Then application.run wb.name &"!" & mymacro
Next wb

 

[pls123]

thx all !! i will test in the weekend !!