How to find tabs that have slightly different names with wildcard?

[ironny90]

Hi there! I am here again. Now I am trying to find a tab in a worksheet, which might have different names due to formatting inconsistency.

It might be named as 08-22 or 8-22. I used wildcard "*" to replace the zero, but vba says out of range.

Set ff = fso.getfolder(folderpath)
For Each file In ff.Files
Workbooks.Open file

Sheets("*8-22").Copy Before:=Sheets("*8-22")
Sheets("*8-22 (2)").Name = "9-22"

Is this the right way to use wildcard? Sorry if some my errors are quite obvious. Thank you for your help in advance!

 

[John_w]

You can't use a wildcard like that to find a specific worksheet. Instead, you have to loop through each sheet and use the wildcard with the Like operator and see if the worksheet's name matches:

    Dim ws As Worksheet
    For Each ws In ActiveWorkbook.Worksheets
        If ws.Name Like "*8-22" Then
            ws.Copy Before:=ws
            ActiveSheet.Name = "9-22"
        End If
    Next

 

[ironny90]

That's what I found as well^^ I tried the loop as well but it didn't find anything Let me test more. Thank you soooo much!!!