Help with Word VBA Variables

[ShaneBrennan]

I want a very simple program that will accept the name of a user via a InputBox then display the input into the current document at the current cursor position.

Does anyone know how to finish off the following Macro to achieve this?

Thanks in advance for any help given

Shane Brennan

Private Sub test()

Username= InputBox("What is your username&quot

** How the devil do I display the contents of Username?

End Sub

Shane Brennan

'-----------------------

' Emails: shanebrennan@postmaster.co.uk

 

[Dreamboat]

You mean that you want to place it in the document, right?

While you may not need the beginning steps, here's a whole tutorial on what you're trying to do.

http://www.dragondrop.com/WordCoding/word011a.asp

Anne Troy
Way cool stuff:

http://www.cafeshops.com/OfficeExperts

 

[ShaneBrennan]

The tutorial was good and helped quite a bit and has given me a good few examples for future documents.

Yes I want to put information into the document, but at the current cursor position not at a bookmark.

The following WILL place the input at the bookmark's position, but I just simply want to paste the contents of the variable to the current cursor position.

Sub test()

UserName = InputBox("Please Enter your username&quot
ActiveDocument.Bookmarks("bmkUsername&quot.Range.Text = UserName
End Sub

I've used:

ThisDocument.Content.InsertAfter (UserName)
ThisDocument.Content.InsertBefore (UserName)

But they place text at the beginning or end of the document - not in the current position.

Thanks again DreamBoat - but it was not what I was looking for for this task - but the link you sent me was fantastic.



Shane Brennan

'-----------------------

' Emails: shanebrennan@postmaster.co.uk

 

[Dreamboat]

What's the purpose of the user form if you don't want to specify the location? I don't understand. If they're finding the location, what's in the user form that helps them? Perhaps you're using a user form and should be using fill-in forms instead:

http://www.theofficeexperts.com/word.htm#Fill-inForms

Anne Troy
Way cool stuff:

http://www.cafeshops.com/OfficeExperts