' Nur eine CheckedBox in der Spalte Vorbelegt darf checked sein
        If e.ColumnIndex = 3 Then ' Wenn Spalte mit Vorbelegt geändert wird
            Dim zeileNr As Integer = e.RowIndex ' Zeilen Nr abfragen
            If dgvAuswahlliste.Item(3, zeileNr).Value = True Then ' abfragen ob 
            ' die bearbeitende Zelle in der Spalte Vorbelegt checked ist
                For zeile = 0 To dgvAuswahlliste.RowCount - 1 ' durch alle 
                ' Zeilen gehen
                    If zeile <> zeileNr Then ' Alle CheckedBoxen bis auf die 
                    ' bearbeitende Zelle in der Spalte Vorbelegt auf false 
                    ' setzen
                        If dgvAuswahlliste.Item(3, zeile).Value = True Then
                            dgvAuswahlliste.Item(3, zeile).Value = False
                        End If
                    End If
                Next
            End If
        End If