VBA - 将包含引号的Excel公式设置为单元格值

我想让我的VB脚本将Excel公式输入到单元格中。不幸的是我迄今还没有运气。VBA - 将包含引号的Excel公式设置为单元格值

Sheets("ABC").Select 
Range("B2").Value = "=IF(Mat_Location!F2=0;"";Mat_Location!F2)"

后一些谷歌上搜索，并在此网站上搜索我想这将是因为引号的，所以我试图改变引号双引号。

Sheets("ABC").Select 
Range("B2").Value = "=IF(Mat_Location!F2=0;"""";Mat_Location!F2)"

这也没有帮助。

任何帮助表示赞赏。提前致谢。

2017-02-21 D. Todor

要添加引号用他们四人即MyString的=“亚当说，”＆“”“”＆“你好简！“ ＆“”“” –

公式无误（假设“;”是您的分隔符，而不是“，”）。一些基本检查，是ABC保护和B2锁定的单元格？工作簿中是否存在工作簿中的“Mat_Location”工作簿（在这种情况下，表格未明确限定为特定的工作簿） – Zerk

@JohnMuggins他特别说他尝试过。 – Zerk

用Chr(34)代替你的多个"，这样更容易调试。

此外，没有必要先将Select表单。

Sheets("ABC").Range("B2").FormulaLocal = "=IF(Mat_Location!F2=0;" & Chr(34) & Chr(34) & ";Mat_Location!F2)"

注意：看来你的Excel的区域设置是有;如公式里面分隔符。默认设置为,，所以我的Excel设置（也许也是你的），它可能是：

Sheets("ABC").Range("B2").Formula = "=IF(Mat_Location!F2=0," & Chr(34) & Chr(34) & ",Mat_Location!F2)"

2017-02-21 13:00:32

@AxelRichter感谢修复，在这里“调试”的中间:) –

谢谢，与上次编辑它工作正常。 :) –

@ D.Todor :)不客气 –

回答