2013-06-17 2 views
1

내 문서는 제목 1과 제목 2뿐만 아니라 MyHead1, MyHead2를 사용합니다. MyHead1 및 MyHead2 항목만으로 목차를 만들고 싶습니다. 목차의 옵션을 사용하고 Heading1 및 Heading 2 스타일에서 TOC 레벨을 제거하여 메뉴에서이 작업을 수행 할 수 있습니다.단어 목차

VBA에서이 작업을 수행하려고합니다. 기록 된 매크로를 사용해 보았습니다.

With ActiveDocument 
    .TablesOfContents.Add Range:=Selection.Range, RightAlignPageNumbers:= _ 
     True, UseHeadingStyles:=False, IncludePageNumbers:=True, AddedStyles _ 
     :="MyHead1,1,MyHead2,2", UseHyperlinks:=True, HidePageNumbersInWeb _ 
     :=True, UseOutlineLevels:=False 
    .TablesOfContents(1).TabLeader = wdTabLeaderDots 
    .TablesOfContents.Format = wdIndexIndent 
End With 

그러나 결과 TOC에는 제목 1과 제목 2 항목이 포함됩니다.

UseHeadingStyles:=False에서 기본 제목 스타일을 제외하길 기대했지만 그렇지 않습니다. 어떻게 그들을 제외합니까?

답변

0

나는 UseHeadingStyles:=False도 그들을 제외시킬 것으로 예상했을 것입니다.

TOC \o "1-9" \h \z \u \t "MyHead1,1,MyHead2,2" 

\o "1-9" 플래그가 여기에 제목 스타일을 나타내고 : 수동으로 TableOfContents를 삽입 한 다음 전체 테이블을 마우스 오른쪽 버튼으로 클릭하고 '토글 필드 코드'를 선택하면 당신은 삽입 된 TOC의 필드 코드 텍스트를 볼 수 있습니다 생략하면 원하는 목차가 남습니다. 따라서이 대안을 가진 코드를 사용하여 목차를 삽입하는 대신 트릭을 수행 할 것입니다. 삽입 후 여전히 ActiveDocument.TableOfContents(1)을 선택할 수 있습니다. http://office.microsoft.com/en-au/word-help/field-codes-toc-table-of-contents-field-HP005186201.aspx

+0

감사합니다 : 목차는 여기를 참조하십시오 필드 코드의 전체 목록은

Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, PreserveFormatting:=False Selection.Text = "TOC \h \z \t " & """" & "MyHead1,1,MyHead2,2" & """" Selection.Fields.Update 

가 전환됩니다. 그것은 작동하지 않는 UseHeadingStyles가 버그 인 것 같습니다. Fields.Add를 제안대로 사용하겠습니다. –

+0

그건 의미가 있습니다. 내 대답이 도움이된다면 대답을 받아들이겠습니까? :) http://stackoverflow.com/help/accepted-answer를 참조하십시오. – CuberChase