* don't work with Workbook.open

[Apple1]

I want to open the file starting with "Sales Records", and used the below code,

But I get the error message that Excel can't find ...Sales Records*.xlsx

Seems like Excel doesn't see * as wildcard in the below code but as part of the filename. Thank you.
--------------

Dim Fname As String

Dim WB1 As Workbook



Application.ScreenUpdating = False

Fname = ThisWorkbook.Name

Set WB1 = Workbooks(Fname)

Workbooks.Open Filename:=WB1.Path & "" & "Sales Records*.xlsx"

 

[Ruddles]

As far as I'm aware you can't use a wildcard with Workbooks.Open. You'd have to do something like this:-

[FONT=Times New Roman][SIZE=3][FONT=Calibri][SIZE=2][COLOR=#385623]sFilename=Dir(WB1.Path & "" & "Sales Records*.xlsx")
[FONT=Times New Roman][SIZE=3][FONT=Calibri][SIZE=2][COLOR=#385623]Workbooks.Open Filename:=sFilename[/COLOR][/SIZE][/FONT][/SIZE][/FONT]
[/COLOR][/SIZE][/FONT][/SIZE][/FONT]