Link document text to userform

[sharky12345]

Is there a way I can link the full text of a document to a userform so that it can be edited from within the form like you can with Excel?

It doesn't have to be a textbox, although that would be the obvious choice if it is possible.

[gmaxey]

You and load a textbox with a storyrange text (e.g., the maintext story):

Private Sub UserForm_Initialize()
TextBox1.Text = ActiveDocument.Range.Text
End Sub

[sharky12345]

Thanks Greg - tried that but the box is blank and I can't type anything in it.

Would it make any difference if the document is a template with bookmarks?

[gmaxey]

Don't know what to say. That code works fine here.

[sharky12345]

I've tried it with a new document and it does work so I'll work on it - the textbox does show the little paragraph marks, do you know of a way to omit those?

[gmaxey]

Set textbox property multiline to true.

[sharky12345]

Thanks!

[sharky12345]

Greg, a final one if I may please?

I can't seem to get the vertical scrollbar to start at the top - can it be done?

[gmaxey]

Private Sub UserForm_Initialize()
With TextBox1
.Text = ActiveDocument.Range.Text
.MultiLine = True
.ScrollBars = fmScrollBarsVertical
.SetFocus
.SelStart = 0
End With
End Sub

[sharky12345]

Thank you again!