VBA To Insert A new Row with Specific formatting

[anish.ms]

may be

Intersect(Rows(ActiveCell.Offset(1).Row), Range("H:S")).Interior.ColorIndex = 0