Hello everyone

I am looking to insert 2 rows after each row with value in column b to the last row + 2 rows after last row with value.
Below is what I am ultimately looking for:
Before
a Test1
Test2
Test3
b Test4
Test5
Test6
Total
After
a Test1


Test2


Test3


b Test4


Test5


Test6


Total

Originally the following code worked prior to me adding grouping in column A and Subtotaling. Any ideas would be greatly appreciated.


Dim myRow As Long

myRow = 21
Do Until Cells(myRow, 2) = ""
If Cells(myRow, 2) = Cells(myRow - 1, 1) Then
myRow = myRow + 1
Else
Cells(myRow, 1).EntireRow.Insert
myRow = myRow + 2
End If
Loop