diff --git a/Aviso/frmGesamtsicherheitenNEU.vb b/Aviso/frmGesamtsicherheitenNEU.vb index 338068b..3926f19 100644 --- a/Aviso/frmGesamtsicherheitenNEU.vb +++ b/Aviso/frmGesamtsicherheitenNEU.vb @@ -1155,9 +1155,9 @@ Public Class frmGesamtsicherheitenNEU ATBNr = dgvGesamtsicherheit.SelectedRows(0).Cells("gs_ATBNr").Value.ToString - If dgvGesamtsicherheit.SelectedRows.Count > 1 Then + If dgvGesamtsicherheit.SelectedRows.Count > 0 Then - For Each row As DataGridViewRow In dgvGesamtsicherheit.Rows + For Each row As DataGridViewRow In dgvGesamtsicherheit.SelectedRows If row.Cells("gs_ATBNr").Value.ToString <> ATBNr Then mutlitpleATBNr = True End If @@ -1181,9 +1181,9 @@ Public Class frmGesamtsicherheitenNEU ATCNr = dgvSicherheitsPos.SelectedRows(0).Cells("gsp_ATCNr").Value.ToString - If dgvSicherheitsPos.SelectedRows.Count > 1 Then + If dgvSicherheitsPos.SelectedRows.Count > 0 Then - For Each row As DataGridViewRow In dgvSicherheitsPos.Rows + For Each row As DataGridViewRow In dgvSicherheitsPos.SelectedRows If row.Cells("gsp_ATCNr").Value.ToString <> ATCNr Then mutlitpleATCNr = True End If @@ -1215,7 +1215,7 @@ Public Class frmGesamtsicherheitenNEU MsgBox("Bitte ATR-Nr angeben!") Exit Sub End If - If dgvGesamtsicherheit.SelectedRows.Count > 1 Then + If dgvGesamtsicherheit.SelectedRows.Count > 0 Then For Each row As DataGridViewRow In dgvGesamtsicherheit.SelectedRows Dim sicherh As New cSicherheiten(row.Cells("gs_gsId").Value, row.Cells("gs_posNr").Value)