Hi all
I have a weird problem with TOC
The following (simplified) code put a TC field and make a TOC from that:
Private Sub TabCon()
Selection.HomeKey unit:=wdStory
ActiveDocument.TablesOfContents.MarkEntry Range:=Selection.Range, _
Entry:="text1" & Chr(9) & "text2" & Chr(9) & "text3", TableID:="P"
Selection.EndKey unit:=wdStory
ActiveDocument.TablesOfContents.Add Range:=Selection.Range, UseFields:=True, _
UseHeadingStyles:=False, TableID:="P"
End Sub
While the TC field is inserted with tabulations:
{ TC "text1(tab)text2(tab)text3" \f P \l "1" }
where (tab) is the tabulation mark, the TOC is inserted only with the first tabulation (and tabulation for page) the second tabulation become a space:
text1(tab)text2 text3(tab)1
Field: { TOC \f P }
Can anyone explain it to me and/or solve the problem I would greately appreciate that - thanks!
Best regards
cllpmc
I have a weird problem with TOC
The following (simplified) code put a TC field and make a TOC from that:
Private Sub TabCon()
Selection.HomeKey unit:=wdStory
ActiveDocument.TablesOfContents.MarkEntry Range:=Selection.Range, _
Entry:="text1" & Chr(9) & "text2" & Chr(9) & "text3", TableID:="P"
Selection.EndKey unit:=wdStory
ActiveDocument.TablesOfContents.Add Range:=Selection.Range, UseFields:=True, _
UseHeadingStyles:=False, TableID:="P"
End Sub
While the TC field is inserted with tabulations:
{ TC "text1(tab)text2(tab)text3" \f P \l "1" }
where (tab) is the tabulation mark, the TOC is inserted only with the first tabulation (and tabulation for page) the second tabulation become a space:
text1(tab)text2 text3(tab)1
Field: { TOC \f P }
Can anyone explain it to me and/or solve the problem I would greately appreciate that - thanks!
Best regards
cllpmc