vba - Wrapped text will not show up

**tdupont** · 10-15-2012, 12:01 AM

Hello Experts,
I'm a new user.
I thought my code below would make the two line Description field show up.
I can only manually double click on the row edge to see it appear in a larger row height.
What is my problem please?

Range("D12:" & "$D$" & LastRow).Select  or  rows("12:" & LastRow).Select
       
        With Selection
            .WrapText = True
            .Orientation = 0
            .AddIndent = False
            .ShrinkToFit = False
            .ReadingOrder = xlContext
            .MergeCells = False
        End With

        rows("12:" & LastRow).Select

**HaHoBe** · 10-15-2012, 12:11 AM

Hi, tdupont,

please use Code-Tags for displaying your code.

Try adding the Autofit-Command:

With Range("D12:D" & LastRow)
  .WrapText = True
  .Orientation = 0
  .AddIndent = False
  .ShrinkToFit = False
  .ReadingOrder = xlContext
  .MergeCells = False
  .EntireRow.AutoFit
End With

Ciao,
Holger

**tdupont** · 10-15-2012, 10:04 AM

THANKS
much appreciated.

some things i just do see.

**Cutter** · 10-15-2012, 01:42 PM

@ tdupont

Welcome to the forum.

Based on your last post it seems that you are satisfied with the solution(s) you've received but you haven't marked your thread as SOLVED. I'll do that for you now but please keep in mind for your future threads that Rule #9 requires you to do that yourself. If your problem has not been solved you can use Thread Tools (located above your first post) and choose "Mark this thread as unsolved".
Thanks.

Also, as a new member of the forum, you may not be aware that you can thank those who have helped you by clicking the small star icon located in the lower left corner of the post in which the help was given. By doing so you can add to the reputation(s) of those who helped.