Does this help? Changes to US, deletes rows, changes back.

Sub BillDoorz()
Dim startdate As Date, enddate As Date

With Application
    .Calculation = xlCalculationManual
    .ScreenUpdating = False
End With
Columns(2).NumberFormat = "m/d/yyyy"
startdate = #9/15/2015#
enddate = #11/1/2015#
Range("B1:B" & Range("B" & Rows.Count).End(3).row).AutoFilter 1, ">" & startdate, xlAnd, "<" & enddate
Range("B2:B" & Range("B" & Rows.Count).End(3).row).SpecialCells(12).EntireRow.Interior.ColorIndex = 6
ActiveSheet.AutoFilterMode = False
Columns(2).NumberFormat = "dd/mm/yyyy;@"
With Application
    .Calculation = xlCalculationAutomatic
    .ScreenUpdating = True
End With

End Sub
Probably better ways though.