Updating TC fields when a matching text is changed!

arefkr · May 21st, 2010, 12:22 AM

Hi,

I am working on a software which reads several Word documents and merges them. Each document has a text (a TextBox) in its Header. When creating the final document, I find that text, create a TC field for that, insert it into the document, update the Table Of Contents. I do it because Word can not create a TOC based on the Header or Footer contents.

This works fine until the header text is modified by the user. If the text is modified, TC fields needs to be updated accordingly. My question is that how can I write a macro that if the text of the text box (which is in Page Header) is changed, the matching TC field is found and its text property is updated? This might happen when the document is saved.

This link describes the source of this requirement:

http://social.msdn.microsoft.com/For...6-1dd64a1eeee4

helps are highly appreciated.

Shasur · May 21st, 2010, 09:52 PM

Hi

Just a thought! How will it be if you loop through all the TextBoxes in the headers of document and re-create TC field and then update TOC. This will be easy if the no of textboxes are less.

Cheers
Shasur

arefkr · May 22nd, 2010, 01:29 AM

Thanks mate,
The biggest problem is that I am a C# developer and I do not know VBA :(
BTW, if I create new TC fields, how can I remove the old ones? can U provide me some sample codes?
you can find a sample file here:

http://rapidshare.com/files/39021243...MPLE.docx.html

Shasur · May 22nd, 2010, 10:06 PM

Hi

Here is a simple way to remove all TC fields in the document

Code:

Sub Remove_TC_Fields()
Dim oField As Field
For Each oField In ActiveDocument.Fields
    If oField.Type = wdFieldTOCEntry Then
        oField.Delete
    End If
Next oField
End Sub

Cheers
Shasur

arefkr · May 22nd, 2010, 10:22 PM

Quote:

Originally Posted by Shasur

Hi

Here is a simple way to remove all TC fields in the document

Code:

Sub Remove_TC_Fields()
Dim oField As Field
For Each oField In ActiveDocument.Fields
    If oField.Type = wdFieldTOCEntry Then
        oField.Delete
    End If
Next oField
End Sub

Cheers
Shasur

Thanks a lot for the code, how can I insert a Macro into a Word Template Document?
Seems that I might be able to translate my current C# code to VBA. I will give it a try and will be back to you if I get stuck :)

Shasur · May 24th, 2010, 06:05 AM

Hi

Press Alt + F11 in the Document Template. This will open the VBE (Visual Basic Editor). You can see the document and its project listed on the leftpane.

Add a new module and add the necessary code to that

Cheers
Shasur

arefkr · May 24th, 2010, 07:13 PM

Thanks for the help. I wrote my first VBA macro ever and it worked like a charm :)