访问excel vba双引号问题

时间:2016-05-14 17:12:37

标签: excel vba double-quotes

我正在使用vba从访问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

感谢

1 个答案:

答案 0 :(得分:1)

如果你想在你正在构建的字符串中嵌入双引号,你可以通过(如你所提到的)使用两对双引号来“逃避”你试图添加的双引号,如下所示: / p>

for(let i in navigator){
    console.log(i);
}

...将返回:

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

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

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

外部两个定义字符串本身;内部的两个代表逃脱的双引号字符。

我总是发现这种形式有些混乱,并且经常选择使用""")" 函数插入双引号,传入双引号字符的ascii值,即34;

chr

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

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

希望这有帮助,

尼姆