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