convert space to non-breaking space

[Daniel Friedman]

How do I convert spaces within a string to non-breaking
spaces?

 

[Dave Lett]

Hi Daniel,

I think you can use something like the following:

Selection.text = Replace(Selection.text, " ", Chr(160))

HTH

 

[Jay Freedman]

Hi, Daniel,

If you're using Word 2000 or later, you can use the line

MyString = Replace(MyString, " ", Chr(160))

In Word 97, you'll need a For..Next loop to go through the string, changing
each space character to Chr(160).

 

[Daniel Friedman]

Regarding the two helpful replies I've received (thank
you!)...how did you know that Chr(160) specifies non-
breaking space? That is, if I should need to look up
something similar, like non-breaking hyphen, how can I
determine that character's code?

--daniel

 

[Jonathan West]

Regarding the two helpful replies I've received (thank
you!)...how did you know that Chr(160) specifies non-
breaking space? That is, if I should need to look up
something similar, like non-breaking hyphen, how can I
determine that character's code?

Type the character you want to check into a document. Select it, and then
open the VBA editor. In the immediate window, type the following

? Asc(Selection.Text)

You'll get the character code back.

--
Regards
Jonathan West - Word MVP
MultiLinker - Automated generation of hyperlinks in Word
Conversion to PDF & HTML
http://www.multilinker.com

 

[Larry]

If you want the ability to do this regularly, make a macro of it. This
will display a message box showing the character code of the selected
character or of the character following the insertion point. Very
handy.

MsgBox Asc(Selection.Text), , "Character Code"


Larry