Excel VBA字符串到变量的转换

如何解决Excel VBA字符串到变量的转换

我目前正在使用Excel VBA宏来自动执行电子表格格式设置和公式填充。

我一直遇到类型不匹配的问题，包括字符串和变量/字符串类型。

用于插入公式的命令（=符号的左侧）是variant / string类型，而公式本身是字符串类型。如何将引用的列表/公式转换为变量类型，或将左侧转换为字符串类型？

可以根据需要提供更多详细信息，我已经四处搜寻，无法找到解决方案。谢谢。

有问题的代码

Sub AddFormulas()

    lr = Cells.Find("*",Cells(1,1),xlFormulas,xlPart,xlByRows,xlPrevIoUs,False).Row

    Range("G4").Formula = "=INDEX('wks'!$A$2:$A$411,MATCH(1,COUNTIF(F4," * "&'wks'!$A$2:$A$411&" * "),0))"
    Range("G4").AutoFill Range("G4:G" & lr)
End Sub