VBA-用双引号引起来的数据

Question

我正在尝试准备将数据插入SQL数据库中，因此某些部分需要用引号引起来。

For Each r In Range("A2", last_data)
    r.Value2 = """ & r.Value2 & """
Next r

这只会用'r.value2'填充所有内容。使用单引号会使它仅出现在单词的右侧。

从本质上讲，需要修改工作表，以便每个单词都用双引号引起来。我在Excel中有一个自定义代码，其中所有内容都用引号引起来，但是当VBA读取单元格时，它将忽略自定义格式。

Answer 1

我认为您需要在... er ...引号内转义单引号，双引号：

For Each r In Range("A2", last_data)
    r.Value2 = """" & r.Value2 & """"
Next r

不幸的是，转义字符是另一个双引号字符，这一事实使事情有些混乱。

因此，对于每个要添加的双引号，都有一个转义字符（“），后跟要添加的实际双引号。然后用两个双引号将它们括起来，表示它是一个字符串值。

很抱歉，如果我没有很好地解释这一点，但是希望您能理解。

尽管，正如@Comintern在评论中建议的那样，很可能有一种更好的方式来做您想要的事情。