Merge Cell + Text Warp

[eagle028]

eg: Column C-H of row 2 are merged. I need the following format for the merged cell:
(1) text wrap and (2) auto expand row height if more text is required in the merged cells. is this achievable?

 

[Stormseed]

Could you not do it manually ?
Select the cell, press Ctrl+1, Alignment tab, Wrap text, Ok.

 

[eagle028]

i am trying to set up a template. Hence it would be good if the text wrap and row height adjustments are automatic. anyway to write a macro for it?

 

[Stormseed]

Hi,
I gather that you want to make the row height and column width automatic for a cell or range of cells on your excel worksheet. Please ensure that you turn on the Wrap Text property of these cells prior to copying this code on your worksheet:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Application.Intersect(Target, Range("A1:H100")) Is Nothing Then
Rows("1:100").AutoFit

End If
End Sub

You should copy this code in the worksheet selection change event in order to make it automatic. I hope you know how to go about doing that on your worksheet else you could post back.

 

[eagle028]

Could you explain the last part. I cannot seem to get it done.

 

[Stormseed]

Which part ? About copying the code to worksheet SelectionChange event ?

 

[Andrew Poulsom]

Autofit doesn't work with merged cells. There is a possible workaround here:

http://www.tech-archive.net/Archive/Excel/microsoft.public.excel.programming/2007-09/msg03400.html

 

[eagle028]

Thanks for the codes.......they look too complicated for me. i've choosen to use the easier method of not merging the cell.
Thanks.