Private Sub DataGridView1_CellFormatting(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.DataGridViewCellFormattingEventArgs) Handles _
      DataGridView1.CellFormatting
 
        ' Nur bei Spalte 0 für gültige Zeilen
        If e.ColumnIndex > 0 OrElse e.RowIndex = bs.Count Then Return 
 
        ' Die Bedingung, wenn Spalte 4 negativ ist...
        If myBindingSource.List(e.RowIndex)(4) < 0 Then
 
            ' Ganze Zeile Rot markieren
            DataGridView1.Rows(e.RowIndex).DefaultCellStyle.BackColor = _
              Color.Rot
        End If
    End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist