Simple macro to conditionally insert a row?

Hi,

I have quite a large data set which has frequent missing lines in that the data should be every 5 minutes but every hour there is at least one 5 minute slot missed - would it be possible to seek help writing a macro to do the following for the data example below IE to fix the missing row between 7 & 8:

- Compare each cell in column B to the value above.
- IF the difference is =10 minutes rather than 5 minutes.
- THEN insert a blank row, copy the time value down into the empty cell in column B adding 5 minutes, copy the value down from the cell above in columns A, C, D.....N into the blank cells of the new row.
- REPEAT until the end of the data - in this case 130,000 rows

Many thanks for any helping minds.

Please Login or Register  to view this content.

Hi K64,

Many, many thanks for your help on this - very much appreciated.

I have run the code but getting a 'Runtime Error 13' Type Mismatch on this line?

Please Login or Register  to view this content.

Probably something I have done wrong?

Hi K64,

I have compiled a test SS - attached - to see if it works for you - I'm still stuck on the type mismatch :-)

Insert5mins.xlsm