2012-03-01 2 views
1

의 2 페이지 사이에 문서를 넣고 다음내가 할 수 있을지 궁금하네요 다른

  1. 삽입 서로이 책갈피는 페이지 번호를 식별 문서
  2. 내 즐겨 찾기

    Sub InsertDoc 
    
        Dim MasterDoc As Document 
        Dim bookmarkRng As Range 
        Dim pageNo As Long 
    
        Set MasterDoc = Documents.Open("Master.docx") 
    
        Set bookmarkRng = MasterDoc.Bookmarks("TheBookmark").Range 
    
        pageNo = bookmarkRng.Information(wdActiveEndPageNumber) 
    
        '1.This is where I need to specify to insert before/after the found page, not sure how 
        MasterDoc.InsertFile FileName:="AnotherDoc.docx" 
    
        '2.Is it possible to use this syntax instead and specify before/after insertion of a whole file? 
        MasterDoc.Bookmarks("TheBookmark").Range.InsertFile FileName:="AnotherDoc.docx" 
    
        MasterDoc.Save 
        MasterDoc.Close 
        Set MasterDoc = Nothing 
    
    End Sub 
    
    :

내 코드 지금까지 확인 된 페이지 전에 문서화 0

도움을 주셔서 감사합니다.

답변

1

아이러니하게도 Word에서 잘못 정의 된 개념 인 페이지는 생각하지 않는 것이 가장 좋습니다. 그러나 재료를 삽입하는 경우 특정 위치에 재료를 삽입해야합니다. 당신이 필요로하지 않는 한, 다음, bookmarkRngPAGENO을 제거 할 수 있습니다, 또한

MasterDoc.Bookmarks("TheBookmark").Range.InsertAfter "XXX" 

: 북마크의 범위를 발견하고 북마크 후 삽입 할 것 같습니다 때문에, 다음을 사용 나중에 웬일인지.

관련 문제