Sam wrote:
Hi Gang,
What is the VBA statement or sequence needed to insert a blank row in
between changes in a particular column? Say I have a column that has
the alphanumeric sequence of abc123. It then repeats 5 times downward
in the same column. Then the sequence changes to def456. How do I
insert a blank row in between the changes in sequence?
Thank you as always.
Sam
================================================== ====
My apologies I found Don Guillett had answered this question already.
Thank you though.
2 From: Don Guillett - view profile
Date: Fri, Feb 3 2006 9:00 am
Email: "Don Guillett"
Groups: microsoft.public.excel.misc
Not yet ratedRating:
show options
Reply | Reply to Author | Forward | Print | Individual Message | Show
original | Report Abuse | Find messages by this author
try this. the key is working from the bottom up instead of the top
down.
Sub insertrowifnotminusonerow()
lr = Cells(Rows.Count, "c").End(xlUp).Row
For i = lr To 2 Step -1
If Cells(i - 1, "c") < Cells(i, "c") Then Rows(i).Insert
Next i
End Sub
--
Don Guillett
SalesAid Software
"rtidrtid"
wrote in
message ...
- Hide quoted text -
- Show quoted text -
anyone a dab hand at Excel? I need a had creating a macro. What i have
is a column with numbers, for example
12222
12222
21111
21111
13333
13333
what i need is a macro which will insert a blank row after an identical
sequence of numbers, turning the above into
12222
12222
21111
21111
13333
13333
any ideas?
--
rtidrtid
------------------------------------------------------------------------
rtidrtid's Profile:
http://www.excelforum.com/member.php...o&userid=31148
View this thread: http://www.excelforum.com/showthread...hreadid=508130
Reply Rate this post: