Count Row with Same Values and Insert Blank Rows

I'm working with a series of cells that need rows inserted if it's not a multiple of 4 (e.g. 4,8,12,16,20,24, etc....). Here's what I have:

G1: 100
G2: 100
G3: 100
G4: 100
DON'T INSERT ROW
G5:100
INSERT 3 ROWS
G6:200
G7:200
G8:200
INSERT 1 ROW
Etc.....

This is the coding that I've come up with so far, but I need formulas to see decimals such as .25 (add 3 rows), .50 (add 2 rows), .75 (add 1 row). If that makes sense.

Please Login or Register  to view this content.

Any help would be much appreciated.

Try it like this - if you want to duplicate the lines rather than just insert lines, then uncomment this line

'.EntireRow.Copy 'Uncomment this line if you want to insert copied rows

I was also guessing that you have headers in row 1 of sheet Database.....

Please Login or Register  to view this content.