Per makro gewünschte Zeile löschen

Computer: Software & Programmierung Office Software
1

Hallo

Ich habe ein Prg. mit 3 Tabellen (1,2,3)
In Tabelle 2 Habe ich zb ein parr namen:
A1 : Toni
A2 : rene
A3 : Jürgen
A4 : Sabine
und ein Auswahlfeldwo ich eben diese Namen auswählen kann. Und die ausgabe erfolgt auf Tabelle2 A1 (natürlich in nr.(zb 1, 2,3 oder4)

jetzt habe ich in Tabelle 2 den befehl Indirekt benutzt:

A2 : INDIREKT(„Tabelle!A“&Tabelle2!A1)
jetzt bekomme ich in Tabelle A2 jedesmal den Namen, der vom Listebfeld angewählt wurde.

Soweit so gut.

Jetzt benötige ich aber ein Makro, das wenn ich zb. im Listenfeld Toni anklicke (hat zb. Nr. 1)
und einen Button drücke, es mir eben aus Tabelle1 den gewählten Namen löscht (am besten die ganze Zeile entfernt)
Wie bringe ich das fertig?

Ich danke euch schon mal im vorraus

2

Hi,

Soweit ich verstanden habe, entspricht die gewählte Nummer in Tabelle 2 A1 der Zeilennummer in Tabelle1 oder?

Dann brauchst Du nur im Makro den Befehl

Worksheets("Tabelle1").Rows(Worksheets("Tabelle2").Cells("A1").Value).Delete

einbauen.

Gruß
Gerald

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]