Autosize Rows in Named range

[Chewyhairball]

Hi

I have a named range called "Summary Table" that I would like to Autofit the row height to the data that is typed in.
Sometimes its just a few words and other times might be a few sentences.

any ides?

thanks

Rory

 

[Chewyhairball]

You are welcome.
Glad that worked for you.

Found a bit of a problem. I can highlight say cells A20:A23 and centre across selection but when I do it on the next 3 cells A24:A26 then it centres it across A20:A26!?

 

[Chewyhairball]

Found a bit of a problem. I can highlight say cells A20:A23 and centre across selection but when I do it on the next 3 cells A24:A26 then it centres it across A20:A26!?

It works OK if you have text in all of the cells but if you have a blank cell it seems to centre the data to the left accross all of the cells.

 

[Joe4]

Found a bit of a problem. I can highlight say cells A20:A23 and centre across selection but when I do it on the next 3 cells A24:A26 then it centres it across A20:A26!?

That is only centering across a single column, not multiple columns.
Center across selection works for centering across multiple columns within a single row.

 

[Chewyhairball]

That is only centering across a single column, not multiple columns.
Center across selection works for centering across multiple columns within a single row.

Hi

I thought this might be useful to someone else. I inadvertantly discovered that if i use

 If Not Intersect(Target, Range("Summarytable")) Is Nothing Then
   ActiveSheet.Unprotect
    Range("SummaryTable").Rows.AutoFit

instead of

Range("SummaryTable").Rows.AutoFit

it works even accross merged cells.