Question

我试图在visual basic中删除双引号。我尝试添加双qutoes但没有任何反应。这是我的剧本：

Sub Makro1（）＆＃39;

' 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

我试过（＆＃34;＆＃34;＆＃34; Diagramm i＆＃34;＆＃34;＆＃34;）和（＆＃34; Diagramm＆＃34;＆＃34;我＆＃34;＆＃34;＆＃34;）但它不起作用。我做错了什么？有什么想法吗？

Answer 1

我相信你要找的是将变量连接到Diagramm。

我认为Diagramm不是变量，而是图表的名称，所以你需要：

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

逃避双引号视觉基本excel

1 个答案: