The Sheets property returns a collection of Worksheets for the supplied
object.

Opened will be either the Application object or a Workbook object - more
likely to be a Workbook object in this case.

You could just replace the word Opened with ActiveWorkbook


--
Rob van Gelder - http://www.vangelder.co.nz/excel


"R.VENKATARAMAN" &&& wrote in message
...
while searching for "wildcards in tab. names" i found this code by J.E.
McGimpsey

For Each Sheet In Opened.Sheets
If Sheet.Name Like "Scales*" Then
MsgBox Sheet.Name
End If
Next Sheet

ofcourse I give
dim sheet as worksheet

but the term <opened is also perhaps to be defined.

seeking for some more clarificationl thanks regards.
mine excel 2000