TOC in Word

[cll]

This question was announced mid october but noone replied, maybe because a wrong subject?

Cant anyone help me ??

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

cll

 

[Binary]

See if you can find one of the MS Word user groups. They are frequented by some very knowledgable folks.

As a rule, I wouldn't expect the ENG-TIPS techies to be up on the intracacies of Word.

 

[IRstuff]

Try posting this question at Tek-tips.com. They're more into Office and Word problems

TTFN

 

[cll]

Thanks,
You might be right!
(- already tried EngTips).
Have found another promising link

http://www.mvps.org/word.

Regards
cll

 

[cll]

Thanks to the hints, I have figured this solution out:

Private Sub tabcon1()

Selection.HomeKey Unit:=wdStory

Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldTOCEntry, Text:= _
Chr(34) & "text1" & Chr(9) & "text2" & Chr(9) & "text3" & Chr(9) & "text4" & _
Chr(34) & "\f P \w", PreserveFormatting:=True

Dim Indholdrange As Range
Set Indholdrange = ActiveDocument.Bookmarks("PIndhold&quot.Range

Selection.Fields.Add Range:=Indholdrange, Type:=wdFieldTOC, Text:= _
"\f P \w", preserveformatting:=True

End Sub

Take care of wordwrap. Bookmark is just to control where to insert the TOC.

If anyone should be interested.

Best regards
cll