Cell reference cell then append specific text using vb

This is probably really easy but I don't know what I'm doing wrong.

Sub Backflip()
    Range("A375").Select
    Range(Selection, Selection.End(xlDown)).Select
    ExportToTextFile FName:="C:\Users\admin\Desktop\xyz.txt", Sep:="'", _
       SelectionOnly:=True, AppendData:=False
End Sub

Pretend I have "C:\Users\admin\Desktop\" in cell D1 and I want to manually keep xyz.txt the same always but just append it to the file path in cell D1 within the vb code. I want to concatenate the D1 value along with a value that I will manually write out in the vb code.

I'm trying

ExportToTextFile FName:="$D$1" & "xyz.txt",

but I'm not sure how to say select D1.

I apologize if this is so basic.

Thanks

Hello sweetrevelation,

The VBA code would be...

  ExportToTextFile FName:=Range("$D$1") & "xyz.txt"