您好,我正在尝试使用“作为我的代码中的字符,但VBA始终会自动将其更正为多余的字符(如果我尝试"""
)。我尝试使用Char(34)
字符代码,但它仍然无法工作。我想循环遍历单元格并搜索单元格中的值,如“ActiveCell.Value
”,但代码不识别“作为一个字符。这是代码:
Sub zero()
Do Until IsEmpty(ActiveCell.Value)
Shell ("C:\Program Files (x86)\Google\Chrome\Application\Chrome.exe -url https://www.google.co.uk/search?q=" & Chr(34) & ActiveCell.Value & Chr(34))
ActiveCell.Offset(1).Select
Loop
End Sub
答案 0 :(得分:4)
您需要在VBA字符串中使用四个兔子耳朵作为单引号字符。
因此我定义了
Public Const vbQuote As String = """"
以这种方式使用
"https://www.google.co.uk/search?q=" & vbQuote & ActiveCell.Value & vbQuote