Thanx for your help friends,
My excel has gone to next level after joining this group.
thanx from bottom of my heart, you all are simple gr8.
Rgds,
Mahender Bisht
On Fri, Jun 26, 2009 at 8:52 PM, Dilip Pandey wrote:
> Hi Mahesh,
>
> 'Try below code:-
> Sub insertt()
> Cells(1, 1).Select
>
Hey,
Hold the cursor where you want to insert the rows. And press ctrl +
twice.
Regards,
Rajesh Kunder
On Fri, Jun 26, 2009 at 4:04 PM, Mahesh wrote:
> Hi All,
>
> Need Your help,
>
> I want 2 insert 2 empty rows between 2 rows containing data.
>
> Please suggest how to do it.
>
> Ex. :
Hi Mahesh,
'Try below code:-
Sub insertt()
Cells(1, 1).Select
While ActiveCell.Offset(1, 0).Value <> ""
ActiveCell.Offset(2, 0).Select
Selection.EntireRow.Insert
Selection.EntireRow.Insert
Selection.End(xlDown).Select
Wend
End Sub
'Thanks,
--
DILIP KUMAR PANDEY
MBA-HR,B COM(Hons.),BCA
Mobile:
Hi Mahender,
If you have ASAP Utilities, You can go to ASAP Utilities->Columns->6.Insert
Between Empty Row and Column.
ASAP Utilities will ask you for Row or column to insert and no. of Row or
Column to Insert.
Regards,
Upendra Singh
+91-9910227325, +91-9310760597
--