excel - 如何在vba中的字符串中加上双引号？

我想通过vba在包含双引号的单元格中插入if语句。

这是我的代码:

Worksheets("Sheet1").Range("A1").Value = "=IF(Sheet1!B1=0,"",Sheet1!B1)"

由于双引号，我在插入字符串时遇到问题。如何处理双引号？

最佳答案

我发现最简单的方法是加倍引用以处理报价。

Worksheets("Sheet1").Range("A1").Formula = "IF(Sheet1!A1=0,"""",Sheet1!A1)"

有些人喜欢使用CHR(34)*:

Worksheets("Sheet1").Range("A1").Formula = "IF(Sheet1!A1=0," & CHR(34) & CHR(34) & ",Sheet1!A1)"

*注意:CHAR()用作Excel单元格公式，例如在单元格中写入“= CHAR(34)”，但对于VBA代码，请使用CHR()函数。

关于excel - 如何在vba中的字符串中加上双引号？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/61344479/