在 VBA 中访问时,我使用 Graph.Chart 对象调整所有文本的大小,使其适合并更改标题以匹配显示的数据。
我测试了几个电脑,一切正常,但在演示室,它不工作。
我收到错误 13,类型不匹配
Dim oGraph As Graph.Chart
'Error after oGraph set. (Type mismatch)
Set oGraph = Me.Graphique0.Object
Dim chSeries As Series
For Each chSeries In oGraph.SeriesCollection
chSeries.DataLabels.Orientation = 45
With chSeries.DataLabels.Font
.Name = "Calibri"
.FontStyle = "Normal"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = vbBlack
.Background = xlAutomatic
End With
Next
我在使用 ADO 时遇到了问题,但在 access 中的引用上没有设置引用
DAO: C:\Program Files\Common Files\Microsoft Shared\OFFICE14\ACEDAO.DLL
Graph: C:\Program Files\Microsoft Office\Office14\GRAPH.EXE
Graph是我认为不起作用的那个,但是两台计算机之间的版本没有区别。
我试图反编译,编译和压缩数据库,没有运气。尝试删除参考,没有运气。没有参考显示“失踪”