0

我在 excel 中有很多图表,我需要改变它们的外观。我在 VBA 中编写了这个 cscript,但它不起作用:

Sub Makro1()
'
' Makro1 Makro
'

'
For i = 1 To 28
    ActiveSheet.ChartObjects("Diagramm " & i).Activate
    ActiveSheet.Shapes("Diagramm " & i).Line.Visible = msoFalse
Next i
End Sub

使用此脚本,我试图将框架线更改为无框架线。但它不起作用,我无法找到错误。此外,我需要更改 y 轴的名称。知道我该怎么做吗?

4

1 回答 1

0

不知道你所说的框架线是什么意思,你的代码通过删除对象边框对我有用。

Y轴是:

ActiveChart.Axes(xlValue, xlPrimary).HasTitle = True
ActiveChart.Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "Title Here"
于 2016-08-30T16:03:54.600 回答