F Frank Kabel Mar 12, 2004 #2 Hi try something like .... row_height=5 ActiveCell.Resize(row_height,1).EntireRow.insert
S SOS Mar 12, 2004 #3 Stuart, Use a With Statement to insert where you want with the row height yo want as seen below Regards Seamus Sub Insert_Row() With Rows("6:6") .Insert Shift:=xlDown .RowHeight = 25.5 End With End Su
Stuart, Use a With Statement to insert where you want with the row height yo want as seen below Regards Seamus Sub Insert_Row() With Rows("6:6") .Insert Shift:=xlDown .RowHeight = 25.5 End With End Su