16,552
社区成员
发帖
与我相关
我的任务
分享
Sub Macro1()
With ActiveChart
.Axes(xlCategory, xlPrimary).HasTitle = True
.Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "日付"
.Axes(xlValue, xlPrimary).HasTitle = True
.Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "障害件数"
End With
End Sub
Sub Macro1()
With ActiveChart
.Add("A", True)
Dim B As Boolean
B = .Item("A")
End With
End Sub