Macro to wrap text and adjust row height

I wrote a macro that wraps the text in Column E and then adjusts the row height for every cell in the worksheet. But when I ran it the text was not wrapped. I then decided that perhaps the wrapping was working in some toggling on/off fashion. So I modified the code to first set the wrapping to 'False' and then set is to 'True'. The result still does not show the text as wrapped though. Any help on what I'm doing wrong is appreciated. Thanks.

Please Login or Register  to view this content.

Thanks for your reply xladept. I tried your code and it made no difference. The wrapping is indeed set to 'on' after running both your code and my code but the entries do not wrap.
I can get the text to wrap by manually turning wrapping 'off' and then 'on' using the toolbar though.

I should add that I'm trying to wrap a column in an Excel 'table' with data generated by a sql query. Not sure if that's a factor though. Thanks in advance for any further input. -John

I created an example file- but then the macro worked on it. So it may have something to do with the query that delivers the data. I can't really share the actual file so I think I will just have to keep pondering this on my own and experimenting.
Thanks, John