excel和访问之间的这些小VBA语言差异正在变得非常a弱。我正在(希望(让我的线条图表查看我的需求,但我无法仅在第一个标记上显示数据标签。这是我到目前为止所拥有的。我尝试了所有可以在线找到的迭代,并且都得到了相同的"错误438:对象不支持此属性或方法"
With Me.ChartSpace.Charts(0).SeriesCollection(0)
.Line.Color = sc1
.Line.Weight = 6
.marker.Size = 8
.marker.Style = 2
sName = .Name
csName = Right(sName, Len(sName) - 8)
.Caption = csName
.Points(1).DataLabel.Text = csName
End With
再次感谢您的帮助。
您可以尝试一下。.请在语句
之前插入这些行Me.ChartSpace.Charts(0).SeriesCollection(0).Points(1).DataLabel.Select
Selection.Format.TextFrame2.TextRange.Characters.Text = "Name"
如果问题仍然存在,请尝试将Me.ChartSpace.Charts(0)
更改为Sheets("SheetName").ChartObjects("ChartName")
,然后放置适当的SeriesCollection
号码