WORD文档的页数（很急的呀）

我现在把WORD文档已经调出来了呀，我想用一个按钮控制WORD文档的页数呀，当我这个文档有许多页，当我按下此按钮就显示下一页的文档内容，当我这个文档有一页，此按钮失效呀，请帮助一下很急的呀，在线等呀

解决方案 »

  1.   

    用下述语句判断页数并按钮是否有效：
    command1.enabled=iif(Selection.Information(wdNumberOfPagesInDocument)=1,true,flase)
    最好加上当前页为最后一页时失效：
    command1.enabled=iif(Selection.Information(wdNumberOfPagesInDocument)=1 Or Selection.Information(wdActiveEndPageNumber) = Selection.Information(wdNumberOfPagesInDocument,false,true)再在command1_click过程中显示下页内容。我没有查到选择全页的方法，自己想办法解决。
      

  2.   

    Application.Browser.Target = wdBrowsePage
    Application.Browser.Next'跳到下一页到最后一页失效，上面的。