Hallo Leute,
heute noch eine Frage. Wie kann ich den Zelleninhalt löschen und nicht die Zeile. Hier ein Code zum Beispiel.
Private Sub CommandButton4_Click()
' Bewohner entfernen
Dim i As Integer
If Me.ComboBox_name.ListCount > 0 Then
If MsgBox("Die markierten Daten werden aus der aktiven Tabelle gelöscht." & vbLf & _
"Wollen Sie fortfahren?", vbYesNo + vbQuestion + vbDefaultButton2, "Achtung!") = _
vbYes Then
With ThisWorkbook.Worksheets("Übersicht")
For i = 11 To .Cells(.Rows.Count, 1).End(xlUp).Row
If .Cells(i, 1) = ComboBox_name.Value Then
.Rows(i).Delete Shift:=xlShiftUp
Exit For
End If
Next i
End With
End If
End If
'usw.
ich hoffe das mir jemand helfen kann. Vorab schon einen herzlichen Dank
Jörg Steffen