vba - Insert row line between the series of numbers which turns the series number to whole number -

vba - Insert row line between the series of numbers which turns the series number to whole number -

the below code insert serial number adding 0.01 value

sub updatenum() range("b10").formular1c1 = "=r[-1]c+0.01" range("b10").autofill destination:=range("b10:b600"), type:=xlfilldefault end sub

this subprocedure called in macro code while inserting rows add together serial number 1.01,1.02..etc.

now trying insert 1 more row in between rows coloring cells in greenish want serial number turn whole number, if numbering value 1.08 , if insert row filled greenish color should automatically alter number value 2.

anybody help me in tweaking above code accomplish result

please reply me clarifications on above query.

vba excel-vba