26.08.2019, 16:10
Guten Abend!
In einem Userform habe ich eine ListBox stehen, in der Datensätze angezeigt werden. Über einen Command Button innerhalb dieses Userforms versuche ich nun den jeweilig ausgewählten Datensatz zu löschen. Das sieht dann so aus:
In der ersten Spalte dieser Listbox steht dabei die Zeilennummer als Zahl, so wird immer die Zeile gelöscht, welche in der Listbox ausgewählt worden ist.
Das funktioniert soweit gut, aber wie stelle ich es an, dass anstelle einer ganzen Zeile, einzelne Zellen der jeweiligen Zeile gelöscht werden?
Vielen Dank und noch einen schönen Abend!
In einem Userform habe ich eine ListBox stehen, in der Datensätze angezeigt werden. Über einen Command Button innerhalb dieses Userforms versuche ich nun den jeweilig ausgewählten Datensatz zu löschen. Das sieht dann so aus:
Code:
Private Sub CommandButton2_Click()
Dim lngZeile As Long
If Me.ListBox1.ListIndex >= 0 Then
lngZeile = Me.ListBox1.Column(0, Me.ListBox1.ListIndex)
If MsgBox("Wirklich löschen?", vbYesNo + vbQuestion) = vbYes Then
Tabelle4.Rows(lngZeile).Delete 'wie stelle ich es an, dass anstelle einer ganzen Zeile, einzelne Zellen der jeweiligen Zeile geleert werden?
End If
End If
End SubIn der ersten Spalte dieser Listbox steht dabei die Zeilennummer als Zahl, so wird immer die Zeile gelöscht, welche in der Listbox ausgewählt worden ist.
Das funktioniert soweit gut, aber wie stelle ich es an, dass anstelle einer ganzen Zeile, einzelne Zellen der jeweiligen Zeile gelöscht werden?
Vielen Dank und noch einen schönen Abend!