Thanks, Vikas. Wow. This is great! I sincerely appreciate it.
On Thursday, March 13, 2014 10:18:44 PM UTC-7, Vikas Verma wrote:
>
> Hi E J try this...
>
>
> Sub testing()
>
> Dim rng As Range
> Dim rcount As Long
> Dim cel As Range
>
> rcount = Sheets(1).Cells(Rows.Count, "c").End(xlUp).Row
> Se
Hi E J try this...
Sub testing()
Dim rng As Range
Dim rcount As Long
Dim cel As Range
rcount = Sheets(1).Cells(Rows.Count, "c").End(xlUp).Row
Set rng = Sheets(1).Range("c1:c" & rcount)
For Each cel In rng
If cel <> cel.Offset(1, 0) And cel <> "" Then
cel.Offset(1, 0).Selec
PFA, just select first complete row
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On
Behalf Of E J
Sent: Friday, March 14, 2014 4:03 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ additional row creation
Hi Everyone,
I was wondering if I cou