转义双引号 visual basic excel

escape double quotes visual basic excel

我试图在 Visual Basic 中转义双引号。我尝试添加双 qutoes 但没有任何反应。这是我的脚本:

子万客隆1() '

' Makro1 Makro
'

'
For i = 1 To 28
    ActiveSheet.ChartObjects("Diagramm i").Activate
    ActiveChart.SeriesCollection(2).Select
    Selection.MarkerSize = 4
    Selection.MarkerSize = 3
    ActiveChart.SeriesCollection(4).Select
    Selection.MarkerSize = 4
    Selection.MarkerSize = 3
    ActiveChart.SeriesCollection(7).Select
    Selection.MarkerSize = 4
    Selection.MarkerSize = 3
Next i
End Sub

我尝试使用 ("""Diagramm i""") 和 ("Diagramm ""i"""),但它不起作用。我做错了什么?有什么想法吗?

我相信您正在寻找的是将变量连接到 Diagramm。

我假设 Diagramm 不是变量,而是图表的实际名称,因此您需要:

ActiveSheet.ChartObjects("Diagramm " & i).Activate