Me.TDSAlle.Dokutool.DefaultView.RowStateFilter = _
          DataViewRowState.Deleted Or _
                                        DataViewRowState.Added Or _
                                        DataViewRowState.ModifiedCurrent
        DGVAlle.DataSource = Me.TDSAlle.Dokutool
 
        For i As Integer = 0 To DGVAlle.Rows.Count - 1
            'Verbindung zur DataTable -> TDSAlle und Reihe ermitteln
            If TDSAlle.Dokutool.Rows(XYZ).RowState = DataRowState.Modified Then
                DGVAlle.Rows(XYZ).DefaultCellStyle.BackColor = Color.Blue
            End If
        Next