Hi

You have to use the parent object as reference:

For Each wb In Application.Workbooks


Regards,
Per

On 8 Maj, 13:08, pls123 wrote:
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 !!