Sub Open_Todays_CSV()
Dim folderPath As String
Dim fileName As String
Dim fullPath As String
' Adjust this to your folder
folderPath = "C:\YourFolderPath\"
' Build filename like: 26-02-11_filename.csv
fileName = Format(Date, "yy-mm-dd") & "_filename.csv"
fullPath = folderPath & fileName
If Dir(fullPath) <> "" Then
Workbooks.Open fullPath
Else
MsgBox "File not found: " & fullPath, vbExclamation
End If
End Sub