If Target.Column = 6 And (25 <= Target.Row <= 225) Then
... is an invalid construct -- for example , 10<=20<=5 returns True

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim r As Range
    
    Set r = Intersect(Target, Me.Range("F25:F225"))
    If Not r Is Nothing Then r.Interior.ColorIndex = 38
End Sub