insert format after specific time in string.
 

Data in A:G.
String of times listed in column F (with header in F1).
Need to search string and insert black line (code below) separating
all times after 12:30:01 AM.

12:09:39 AM
12:10:34 AM
12:30:04 AM
12:31:17 AM


Rows("20:20").Select
Selection.Insert Shift:=xlDown
With Selection.Interior
.ColorIndex = 1
.Pattern = xlSolid
End With
Selection.RowHeight = 5.25