Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Mit Listbox Datensätze löschen
#1
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:


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 Sub

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!
Antworten Top
#2
Hallo,

z.B. so:
'Zelle der 2. Spalte (B) wird geleert
Tabelle4.Cells(lngZeile, 2) = ""
'Zelle der 5. Spalte (E) wird geleert
Tabelle4.Cells(lngZeile, 5) = ""
Gruß Uwe
[-] Folgende(r) 1 Nutzer sagt Danke an Kuwer für diesen Beitrag:
  • diving_excel
Antworten Top
#3
Vielen Dank!
Schönen Abend noch!

Gruß
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste