Some help please!!! I'm really a VB dummie!!!
I've already created an AutoExec macro in a Word template that displays a
form...
Now, how do I put the entered data in a Word field after pressing a command
button in the form???
Thanks!

Hi Vampire,

Insert bookmarks into your template at the locations where you want the
information to appear and then use the following command in the
CommandButton Click event:

With ActiveDocument
    .Bookmarks("Bookmark1").Range.InsertBefore TextBox1
    .Bookmakrs("Bookmark2").Range.InsertBefore TextBox2

    Etc.

End With

Hope this helps,
Doug Robbins - Word MVP
Please post any follow-up to the Newsgroups so that others may benefit
therefrom or contribute thereto.

YESSS!!! It works!!!
Thank you very much!
But now I have another problem...
I want to give the user the option of correcting information!
When I run the code for the first time I'll get bookmark: TextBox1 as I
want.
But when I run it again I'll get it obviously inserted like Bookmark:
textbox1textbox1.
Now, how can I clear the bookmark contents before the new insertion?

Hi Pete,

1) You need to create [content] bookmarks, rather than Ilocation point
bookmarks. Select something (placeholder text, for instance), then
Insert/Bookmark.

2) Use this code to put information into the bookmark:

Sub InsertInfoAtBkmk()
    Dim rngBkm As Word.Range
    Dim BkmName As String

    BkmName = "Test"
    If ActiveDocument.Bookmarks.Exists(BkmName) Then
        Set rngBkm = ActiveDocument.Bookmarks(BkmName).Range
        rngBkm.Text = "Test"
        ActiveDocument.Bookmarks.Add Name:=BkmName, _
            Range:=rngBkm
    End If
End Sub

Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister
http://go.compuserve.com/MSOfficeForum

This reply is posted in the Newsgroup; please post any follow question or
reply in the newsgroup and not by e-mail :-)

Hi Pete,

Try the following. It *replaces* the bookmark with your text, then
re-creates the bookmark around the text.

---------------------------------------------------------

Dim myRange As Range

With ActiveDocument
    Set myRange = .Bookmarks("Bookmark1").Range
    myRange.Text = TextBox1.Text
    .Bookmarks.Add "Bookmark1", myRange
End With

---------------------------------------------------------

Hope this helps.
Regards
ibby

Please post any replies to the **newsgroup** so that others in the newsgroup
may contribute or benefit.

| > Hi Vampire,
| >
| > Insert bookmarks into your template at the locations where you want the
| > information to appear and then use the following command in the
| > CommandButton Click event:
| >
| > With ActiveDocument
| >     .Bookmarks("Bookmark1").Range.InsertBefore TextBox1
| >     .Bookmakrs("Bookmark2").Range.InsertBefore TextBox2
| >
| >     Etc.
| >
| > End With
| >
| > Hope this helps,
| > Doug Robbins - Word MVP
|
| YESSS!!! It works!!!
| Thank you very much!
| But now I have another problem...
| I want to give the user the option of correcting information!
| When I run the code for the first time I'll get bookmark: TextBox1 as I
| want.
| But when I run it again I'll get it obviously inserted like Bookmark:
| textbox1textbox1.
| Now, how can I clear the bookmark contents before the new insertion?
|
|

It works!!!
Thank you all!!!