excel宏问题

zhaishaosi

我在excel宏命令里加入了根据数据行数自动向下填充公式
Sub 按数据长度自动填公式()
    Dim ws As Worksheet
    Dim lastRow As Long
    Dim 基准列 As String, 公式列 As String
    Set ws = ThisWorkbook.ActiveSheet
    基准列 = "A"
    公式列 = "E"
    lastRow = ws.Cells(ws.Rows.Count, 基准列).End(xlUp).Row
    ws.Range(公式列 & "2").Formula = "=XLOOKUP(A2,C:C,D:D,"无")"
    ws.Range(公式列 & "2:" & 公式列 & lastRow).FillDown
End Sub
运行时报错，提示编译错误，缺少语句结束，错误位置在里面的“无”，后来把“无”去掉就不报错了
公式把“无”前面的引号当成结束符了，如何不改变公式效果来实现原目标，求解。