VBA - Activate Workbook with name like...

[ChrisFoster]

Hi all,

I expect this is fairly simple.

I have a large amount of code, but I'm stuck at this particular point.
The code will activate different workbooks at certain points but they are all have static filenames apart from one of them. For the one that isnt static the one constant is always "- All Clients". So for example;

April 2020 - All Clients
May 2020 - All Clients
June 2020 - All Clients

Is there a one line of code I can use to open the workbook that is like ...- All Clients?
It will be the only workbook open that has a name like this so it can't be confused anywhere.

Cheers

Chris

 

[Joe4]

It doesn't seem to like the use of wildards in "Windows(...).Activate", so I am not sure how to do it using just one line.
But we can use something like this block to activate a file whose name ends in All Clients.xlsx":

    Dim wb As Workbook
    
    For Each wb In Application.Workbooks
        If Right(wb.Name, 16) = "All Clients.xlsx" Then
            wb.Activate
            Exit For
        End If
    Next wb

 

[ChrisFoster]

It doesn't seem to like the use of wildards in "Windows(...).Activate", so I am not sure how to do it using just one line.
But we can use something like this block to activate a file whose name ends in All Clients.xlsx":

    Dim wb As Workbook
   
    For Each wb In Application.Workbooks
        If Right(wb.Name, 16) = "All Clients.xlsx" Then
            wb.Activate
            Exit For
        End If
    Next wb

Thank-you.

 

[Joe4]

You are welcome.