Row Height auto fit not working with wrapped text

Hi
I have a large excel file (BoQ) with approx 2000 rows (items)

I have a problem with rows heights, text wrapped but not fully showed when trying to print ,
manually I can do it,but it will take alot of time

Is there any solution to this problem

so that I can reduce time.

Regards

up... please help

Select all rows, right-click, Row Height, adjust manually for all rows. Does it work for you?

Hi Ahaj16,

Select all rows, double click at any row, hope you can do.

Originally Posted by bmouse

Select all rows, right-click, Row Height, adjust manually for all rows. Does it work for you?

hi

That's what I am doing usually

but, I have large number of rows and it take long time

I am searching for something quicker

Originally Posted by NGUYEN PHI HA

Hi Ahaj16,

Select all rows, double click at any row, hope you can do.

this is the same as format > Auto fit row height

It doesn't work

Hi,
if you cannot, send me your file, i will show you.

Thank you all for your efforts


After searching around this problem I managed to get a solution ..

I have entered the macro world and started learning it. I found a macro that sets the row height to a specific height

and changed it to suit my needs.

Solution as follows:

1. after doing the auto row height fit in excel

2. I run the following macro

Sub RHeight()

Set cr = Selection

For Each cr In cr.Rows

If cr.RowHeight > 20 And cr.RowHeight < 60 Then
newHeight = cr.RowHeight + 20
cr.VerticalAlignment = xlTop
cr.RowHeight = newHeight

ElseIf cr.RowHeight < 20 Then
newHeight = cr.RowHeight + 12.5
cr.VerticalAlignment = xlTop
cr.RowHeight = newHeight

ElseIf cr.RowHeight > 60 And cr.RowHeight < 100 Then
newHeight = cr.RowHeight + 25
cr.VerticalAlignment = xlTop
cr.RowHeight = newHeight
Else
newHeight = cr.RowHeight + 30
cr.VerticalAlignment = xlTop
cr.RowHeight = newHeight
End If

Next cr

End Sub

This macro adds specific height to the entire height.( depending on the current row height )


Just wanted to share this to others so that they can benefit from it ...


Thanks Excel Forum

Ahmed Ajjour