Datensatz per Userform löschen

[Heiandi]

Hallo Leute
ich habe eine Tabelle die ich per Userform mit Daten fülle. jetzt brauche ich ein Makro das mir aus dieser Tabelle Zeilen löscht. Die Tabelle sieht so aus: Spalte B Namen der Mitarbeiter, Spalte C Datum z.B. Meier 12.05.13. Jetzt möchte ich aus der Tabelle per userform einen Namen auswählen und das dazugehörige Datum und dann diese Zeile löschen.
Im Moment verwende ich dieses Makro:
Private Sub cmdDatensatzlöschen_Click()
'löscht den Datensatz
Dim Antwort
Antwort = MsgBox("Soll der ausgewählte Datensatz gelöscht werden?", vbQuestion + vbYesNo, "Sicherheitsabfrage")
If Antwort = vbNo Then
    Exit Sub
End If
Sheets("Tabelle2").Activate
Rows(Me.cmbMitarbeiter.ListIndex + 2).Select
Selection.Delete Shift:=xlUp

End Sub[/font]
Vielen dank schon mal im vorraus

[gmg-cc]

Hallo,

es stellt sich mir die Frage: "Und warum soll es etwas anderes sein?" - Ohne die datei (mit anonymisierten Daten) wird dir nur schwer geholfen werden können, zumal dein geposteter Code etwas "eigenwillig" ist.

[Beverly]

Hi,

und wo ist das Problem? Der Code macht doch genau das - auch wenn man auf Select und Activate verzichten kann.
Falls deine Tabelle in einer anderen Zeile beginnt, musst du nur + 2 durch den entsprechendne Zeilenversatz ersetzen.

Bis später,
Karin