Macro to insert Hard Space (character 160)?

E

Edward Mendelson

Hello,

Is there a very simple macro out there that would let me insert character
160 (the hard space) into the current cell? I am looking for something like
this because I want to be able to apply "accountant single" and "accountant
double" underlining to a blank cell, and Excel seems to demand that some
text be IN the cell before it will underline it. The hard space works
perfectly, but it would be nice to be able to automate it.

Many thanks for any advice,

Edward Mendelson
 
J

Jerry W. Lewis

Sub HardSpace()
ActiveCell.Value = ActiveCell.Value & Chr(160)
End Sub

Jerry
 
E

Edward Mendelson

Jerry W. Lewis said:
Sub HardSpace()
ActiveCell.Value = ActiveCell.Value & Chr(160)
End Sub
Click to expand...

Jerry -

Many thanks - couldn't be simpler than that, could it? It looks obvious now
that I know how, but I didn't know how...!

Thanks again!

Edward Mendelson
 
J

Jerry W. Lewis

You are welcome.

Jerry

Edward said:
Jerry -

Many thanks - couldn't be simpler than that, could it? It looks obvious now
that I know how, but I didn't know how...!

Thanks again!
Click to expand...
 
Top