【发布时间】:2017-07-31 17:30:57
【问题描述】:
您好,我正在编写将英制值转换为公制的代码。但是我无法让我的代码正常工作,它总是在第一行给我一个错误。见以下代码:
Sub DrawingViewScale()
Dim oDoc As DrawingDocument
Set oDoc = ThisApplication.ActiveDocument
Dim oView As DrawingView
Set oView = oDoc.ActiveSheet.DrawingViews.Item(1)
MsgBox oView.scale()
oView.[scale] = 25.4
MsgBox oView.scale()
End Sub
【问题讨论】: