Excel 从多个单元格中复制内容并添加引号

Excel copy contents from multiple cells adding quotations

我正在尝试合并 excel 中多个单元格的内容。这是我想要做的一个例子:

(单元格 1):李四

(小区 2):5950

(Cell3):自动填充 "John Doe" XXXXXX5950

我知道我可以使用公式 =&[Cell1]&" XXXXXX"&[Cell2]

合并单元格

但我希望它在名称的每一侧都加上“”,但代码不会例外,因为使用公式的一部分是使用“符号。对此有什么帮助吗?

您可以使用双引号转义 VBA 中的 " 字符。

Range("A1").Formula = """" & Range("B1").Value & """ XXXXXX" & Range("C1").Value

或者您也可以使用 ASCII 字符 34。

Range("A1").Formula = Chr(34) & Range("B1").Value & Chr(34) & " XXXXX" & Range("C2").Value

在字符串中使用两个双引号来放置双引号:

=""""&[Cell1]&""" XXXXXX"&[Cell2]