Assigning a VLookup Formula to A Cell With VBA

[Ark68]

I am having a mental block and I just can't seem to see the error with this code that is clearly messed up.

The workbook name is (2022) Sunset.xlsx
The Worksheet name is 'Sunset'
The range is Columns A:D

With myworksheet               
cyr = Year(Now)
     sunfn = "(" & cyr & ") Sunset.xlsx"
     .Range("T1") = "=VLOOKUP(M1,'D:\WSOP 2020\SupportData\" & sunfn & "Sunset'!$A:$D,2,FALSE)"
End With

The formula that gets put into the cell is

=VLOOKUP(M1,'D:\WSOP 2020\SupportData\[(2022) Sunset.xlsxSunset](2022) Sunset'!$A:$D,2,FALSE)

Looking for a set of eyes to locate my error.

 

[Fluff]

How about

.Range("T1") = "=VLOOKUP(M1,'D:\WSOP 2020\SupportData\[" & sunfn & "]Sunset'!$A:$D,2,FALSE)"

 

[Ark68]

Thanks Fluff. I would never have figured that out I'm afraid to say.

 

[Fluff]

Glad to help & thanks for the feedback.