VBA - Insert row and Fit

Post date: Sep 30, 2010 5:16:35 PM

ActiveCell.EntireRow.Insert

Selection.RowHeight = 40

With Cells

.WrapText = False

.EntireColumn.AutoFit

End With