Excel Macro - Windows Command with Beginning of Filename?

[MEUserII]

Is there a way to use the Excel Macro command, "Windows", to work with the beginning of a file name? For example, if I want to activate the "window" with the filename "ABCD EFGH IJKL.xlsx" already open it would look like this: Windows("ABCD EFGH IJKL.xlsx").Activate How would I do this for just the first part of the filename, like: "ABCD*.xlsx"?

 

[Haluk]

Try this;

Sub Test()

    Dim Strfile As String
    
    Strfile = "ABCD*"
    
    For Each WB In Workbooks
        If WB.Name Like Strfile Then WB.Activate
    Next
    
End Sub

 

[MEUserII]

I came up with this answer to my own question: Sub Solution() '+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Dim FileOnly1 As String FileOnly1 = ActiveWorkbook.Name Dim RIGHTRESULT1 As String RIGHTRESULT1 = Right((FileOnly1), ((Len(FileOnly1)) - (4))) Windows("ABCD" & RIGHTRESULT1).Activate '+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ End Sub

 

[MEUserII]

Updated code formatting:

CODE:

I came up with this answer to my own question:
Sub Solution()
Dim FileOnly1 As String
FileOnly1 = ActiveWorkbook.Name
Dim RIGHTRESULT1 As String
RIGHTRESULT1 = Right((FileOnly1),  ((Len(FileOnly1)) - (4)))

Windows("ABCD" &  RIGHTRESULT1).Activate
End Sub