Replacement.Text fails to render vbCrLf

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

sandal - 02 Oct 2007 02:40 GMT

When I use a statement like

With .Selection.Find
.Replacement.Text = "Some Text" & vbCrLf & "More text on a new line"

I get a mess like

Some Text [][]More text on a new line

Those [] are standing in for little square characters.

It should be simple but how do I get

Some Text
More text on a new line

Reply to this Message

Greg Maxey - 02 Oct 2007 02:50 GMT

Try vbCr

e.g.,

Sub ScratchMacro()
Dim oRng As Word.Range
Set oRng = ActiveDocument.Range
With oRng.Find
.Text = "Test"
.Replacement.Text = "Test" & vbCr & "More text on following line"
.Execute Replace:=wdReplaceAll
End With

End Sub

Signature

Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.

> When I use a statement like
>
[quoted text clipped - 11 lines]
> Some Text
> More text on a new line

Reply to this Message

sandal - 02 Oct 2007 02:57 GMT

I tried that and vbLf and Chr(13) you name it...

Reply to this Message

Tony Jollans - 02 Oct 2007 09:05 GMT

You should use "^p" to get a paragraph in the body of a word document.

If you are getting little square characters something is odd. Where is the
Selection?

Signature

Enjoy,
Tony

>I tried that and vbLf and Chr(13) you name it...

Reply to this Message