代码如下,紧接着第一张图是错误提示“Microsoft.office.core”在命名空间中“MsoTriState”不明确,只要用到这个命名空间下的成员就会出这个错误,我后来发现用如下第二张图中后面等于的那个数字可以代替,也不会提示错误。不过这个替代方法并不是都可以。例如:
这句话可以运行,也能实现相应操作
chartPage.PlotArea.Format.Line.Visible = 1 'Microsoft.Office.Core.MsoTriState.msoFalse
而这句话就不行,运行会出错
axisX.Format.TextFrame2.TextRange.Font.Bold = -1
核心问题有两个,第一个是,“Microsoft.office.core”在命名空间中“MsoTriState”不明确这个错误是什么原因造成的,如何解决(引用的组成见第三张图所示)
第二个是,为什么后面直接用数字,有的语句可以,而有的却不行,同样的做法。
还望高手能帮忙看看,多谢
Dim axisX As Excel.Axis = chartPage.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary)
Dim axisY As Excel.Axis = chartPage.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary)
axisX.HasTitle = True
axisY.HasTitle = True
axisX.AxisTitle.Text = "转速/(r/min)"
axisY.AxisTitle.Text = "掩蔽指数/(dB)"
axisX.Select()
axisX.Format.Line.ForeColor.RGB = RGB(0, 0, 0)
axisX.Format.Line.Weight = 1.5
axisX.Format.TextFrame2.TextRange.Font.Bold = Microsoft.Office.Core.MsoTriState.msoTrue