懒码农。。。。。。

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::
    If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdNormalView
    Else
        ActiveWindow.View.Type = wdNormalView
    End If

 

 

wdNormalView '普通视图  1

wdWebView    'WEB视图  6

wdPrintView  '页面视图  3

 

手动切换在WORD菜单栏 -> 视图 

posted on 2011-12-12 16:20  阿彬  阅读(474)  评论(0编辑  收藏  举报