place value of bookmark in footer

E

erik

hello!

i wrote the following lines to put the value of a bookmark in the footer of
the document.

Sub voettekst()

Dim vttkst As Range
Set vttkst = Bookmarks("actie1").Range

ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary).Range.Text = vttkst



End Sub

But the output of this is: FORMTEXT IN02021 (where is IN02021 the value of
the bookmark). I don't want to see 'FORMTEXT'.

Does anybody know how to use this program without getting FORMTEXT in the
output?

thnx!
erik
 
J

Jezebel

ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary).Range.Text =
mid$(vttkst,10)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Help with changing the value of {FORMTEXT} for every page using ma 1
Pasting a cell into bookmarked table from excel vba 1
If bookmark exists within footer 5
Add/Replace bookmark in the footer 3
bookmark sections 0
Different fonts in footer when using "Footers(wdHeaderFooterFirstPage).Range" - XP SP3, Word 2003 SP 5
Word Macro for multiple searches, incl. in footnotes 2
Drop down list control value in vba 2

Top