Break line

[mikesal57]

Hey Guys...

How can I add a break line between when a new set of numbers appear...

Date	Post	Track	Racenum
3/20/19	16:00	CT	1
3/20/19	16:00	CT	1
3/20/19	16:00	CT	1
3/20/19	16:00	CT	1
3/20/19	16:00	CT	1
3/20/19	16:00	CT	1
3/20/19	16:29	CT	2
3/20/19	16:29	CT	2
3/20/19	16:29	CT	2
3/20/19	16:29	CT	2
3/20/19	16:29	CT	2
3/20/19	16:29	CT	2
3/20/19	16:57	CT	3
3/20/19	16:57	CT	3
3/20/19	16:57	CT	3
3/20/19	16:57	CT	3
3/20/19	16:57	CT	3
3/20/19	16:57	CT	3
3/20/19	16:57	CT	3
3/20/19	17:24	CT	4
3/20/19	17:24	CT	4
3/20/19	17:24	CT	4
3/20/19	17:24	CT	4
3/20/19	17:24	CT	4
3/20/19	17:24	CT	4

<tbody>
</tbody>

I need to add a blank row everytime column 4 changes..

Thxs

Mike

 

[Fluff]

How about

Sub mikesal57()
   Dim i As Long
   
   For i = Range("D" & Rows.Count).End(xlUp).Row To 3 Step -1
      If Range("D" & i) <> Range("D" & i - 1) Then Rows(i).Insert
   Next i
End Sub

 

[mikesal57]

Thanks Fluff

 

[Fluff]

You're welcome