访问excel vba双引号问题

穆罕默德·舒伯

我正在使用vba将数据从对Excel的访问权限导出,而我希望Excel能够接收以下行:-

 =COUNTIF('Sheet1'!G2:G68,"1/1")
 =COUNTIF('Sheet1'!G2:G68,"1/2")
 etc...

我的问题是我无法正确添加这些双引号,我知道要打印该符号,我应该像这样用“”将它两次,但是还是没有运气,我会遇到各种各样的错误,请您修改我的代码:=

For r = 6 To 16
.Range("B" & r).Value = "=COUNTIF('Sheet1'!C1:C67,1/" & r - 5 & ")"
Next

谢谢

如果您希望将双引号嵌入正在构建的字符串中,则可以通过(如前所述)使用两对双引号来“转义”尝试添加的双引号,如下所示:

"=COUNTIF('Sheet1'!C1:C67,""1/" & r - 5 & """)"

...将返回:

=COUNTIF('Sheet1'!C1:C67,"1/-5")

要记住的重要一点是,为了正确地避免插入的双引号,请勿将将字符串本身定义为两对之一的双引号计算在内。这就是为什么在上面的示例中最后有4对:

""")"

外面的两个定义字符串本身。内部的两个代表转义的双引号字符。

我总是觉得这种形式有些令人困惑,经常会选择使用chr函数插入双引号,并为双引号字符输入ascii值34。

"=COUNTIF('Sheet1'!C1:C67," & chr(34) & "1/" & r - 5 & chr(34) & ")"

...将返回与第一个示例相同的结果:

=COUNTIF('Sheet1'!C1:C67,"1/-5")

希望这可以帮助,

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章