MS Word VBA 스크립트를 사용하여 기존 콘텐트 컨트롤에 북마크 추가

Question

문서 내에 150 개의 Content Control (CC) 상자가 있으며 VBA 스크립트를 사용하여 프로그래밍 방식으로 북마크를 추가 할 수 있는지 궁금해하고 있습니다. 새 북마크의 이름은 CC에 삽입 한 제목 또는 태그와 일치해야합니다. 예를 들어, 제목이 'TestResults'인 문서에 CC가있는 경우 해당 CC에 'TestResults'라는 책갈피를 삽입하고 싶습니다. 나는 VB에서 절대 초보자입니다!

1. 모든 문서 CC들과 그들의 제목 공통 제목을 일치
2. 삽입 즐겨 찾기 :
   그래서 나는 코드가 다음을 수행 할 것 같아요.

Answer 1

이 당신을 위해 작동합니다 :

Sub AddBookmarksAtCC() 
    Dim ccobjA As ContentControl, i As Integer 
    For i = 1 To ActiveDocument.ContentControls.Count 
     Set ccobjA = ActiveDocument.ContentControls.Item(i) 
     Debug.Print ccobjA.Title 
     ActiveDocument.Bookmarks.Add ccobjA.Title, ActiveDocument.ContentControls.Item(i).Range 
    Next i 
End Sub 

이 절차는 문서의 모든 콘텐츠 컨트롤을 계산하고, 그 모든하지만 루프 것 하나 하나에 북마크를 추가. 그대로, 북마크는 콘텐츠 컨트롤의 제목이됩니다. 태그로 만들려면 ccobjA.Title을 ccobjA.Tag으로 대체하십시오. 문제가 계속되면 알려주세요.