比如,WORD文件,打开后显示第2页,这个VBA能实现吗?
打开文件我是这样写的:
    Dim wdApp
    Set wdApp = CreateObject("word.application")
    wdApp.Visible = True
    wdApp.Documents.Open("D:\test.doc")

解决方案 »

  1.   

    Option ExplicitSub Main()
        Dim wdApp As Word.Application
        Set wdApp = New Word.Application
        wdApp.Visible = True
        wdApp.Documents.Open ("C:\temp\1.doc")
        wdApp.Selection.GoTo wdGoToPage, wdGoToNext, , "2"
    End Sub
      

  2.   

    dApp.Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Count:=2
    VBA里面应该是这样写的吧。可为啥没有效果呢?test.doc一共4页。
      

  3.   

    要添加对 Word 的引用。