Delete rows based on match criteria in two excel files, 1 might be .csv file .Opened in Excel=Fail Chaos

[fixer]

Instead of this

Let PathAndFileName = ThisWorkbook.Path & "\csv Text file Chaos\" & "Alert 24 Mai..csv"

I need this type of opening of file

Set w2 = Workbooks.Open("C:\Users\WolfieeeStyle\Desktop\2.csv")