I have the below code that uses a command button. It will insert a row when the value changes in column K starting at row 11 (colors). It works great, but I wonder if there is a way to add in the formulas and formatting to the inserted rows?

Any help would be greatly appreciate. I truly thank you!

Code:

```
Dim LR As Long, i As Long
LR = Range("K" & Rows.Count).End(xlUp).Row
For i = LR To 12 Step -1
If Range("K" & i).Value <> Range("K" & i - 1).Value Then Rows(i).Insert
Next i
End Sub
```

Any help would be greatly appreciate. I truly thank you!

Last edited: