我正在尝试编写一段VBA,其中我将文本的fixed部分粘贴到文本的variable部分。但是,在我的固定文本部分中,出现了许多撇号,而VBA不喜欢它,因此出现错误。
这是我正在使用的代码部分,其中包含撇号:
For j = 1 To nrOfItems
For i = 1 To nrOfLanguages
Set c1 = Nothing
Set c2 = Nothing
If Not IsEmpty(Sheets("INPUT IMAGE WITH MOUSEOVER").Cells(j + 2, i * 2).Value) Then
Set c1 = Sheets("INPUT IMAGE WITH MOUSEOVER").Cells(j + 2, (i * 2) + 1)
Set c2 = Sheets("INPUT IMAGE WITH MOUSEOVER").Cells(j + 2, i * 2)
code = code + "if(GETVALUE(""SD1TAAL"") ==" + _
CStr(Sheets("INPUT WITH MOUSEOVER").Cells(1, i * 2).Value) + ")" + _
"{ my $image = '<img src=" ' . GRAPHICSPATH() . ' " + _
fnConvert2HTML (c1) + _
".png "/>' ; my $toolTip =' " + _
fnConvert2HTML (c2) + _
"'; return TOOLTIP($image, $toolTip); } "
End If
Next i
Sheets("OUTPUT_IMAGE_WITH_MOUSEOVER").Cells(j, 1).Value = begincode + code + endcode
code = ""
Next j
['。GRAPHICSPATH()出问题了。”向前。有人可以通过解释我如何替换撇号]并使它工作吗?
非常感谢蒂娜
我正在尝试编写一段VBA,在其中我将文本的固定部分粘贴到文本的可变部分。但是,在我的文本固定部分中,出现了一些撇号,VBA不喜欢这些撇号,并且...
不需要专门替换任何撇号。足以避免双引号加倍: