Sometimes I have to run it twice to get a larger range of cells set the way I
want--but it is easier than doing it cell by cell. (lazy = a good thing!)
<vbg

Nick Hodge wrote:

Dave

That's just lazy ;-)

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
HIS

"Dave Peterson" wrote in message
...
And one more option:

Sub Wrap_Text2()
Selection.WrapText = not activecell.wraptext
End Sub



Terri@Lear wrote:

There is an icon for almost every other formatting function, and wrap
text is
one I use continually, but there's no shortcut and it takes several steps
each time.

--

Dave Peterson

--

Dave Peterson