菜鸟求教:代码"属性的使用无效"问题

wang1950317

各位大侠 :下面是一段使显示页面与实际页面相同的代码,运行提示:"属性的使用无效" View处翻白.请大侠给改改.谢谢!

     Public Sub 全真打印显示()

'

' 全真打印显示 Macro

' 宏在 2004-12-23 由 ldc 创建

'

ActiveWindow.ActivePane.View

Zoom.Percentage = 67

End Sub