Select a sheet with a partial name in vba

[S Oberlander]

I'm trying to select a sheet in a workbook with vba, however the sheet name varies slightly.
It always starts with "Non-qualifying-transactions-" followed by several numbers.
How can I select this sheet using just those three words? There will always only be on sheet named like that in the workbook.

 

[Joe4]

One way:

Sub SelectSheet()
    
    Dim ws As Worksheet
    
    For Each ws In Worksheets
        If Left(ws.Name, 28) = "Non-qualifying-transactions-" Then
            ws.Activate
            Exit For
        End If
    Next ws
    
End Sub

 

[JoeMo]

Sub SelectSheet()
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Worksheets
    If sh.Name Like "Non-qualifying-transactions-*" Then
        sh.Select
        Exit For
    End If
Next sh
'rest of code
End Sub

 

[S Oberlander]

Thanks Joe4 and JoeMo
both work.

I appreciate seeing both ways to brush up on my VBA skills!

 

[Joe4]

You are welcome.
Glad we could help.

As you can see, both solutions use the same concepts and are very similar.