Microsoft Excel

Herbers Excel/VBA-Archiv

Datenzeile markieren, löschen

Betrifft: Datenzeile markieren, löschen
von: Julius
Geschrieben am: 22.04.2003 - 12:08:21

Schönen guten Tag!
Ich möchte über ein Ergebnisfeld, welches von einem Kombinationsfeld seine Werte bekommt ein Zeilenauswahl steuern, um diese Zeile dann zu löschen.
Sagen wir das Ergebnisfeld ist die Zelle "D12".
Der Wert beträgt "5"
Nun wird eine Zeile mit einem Makro ausgewählt.
z.B.:Rows("13:13").Select (Zeile 13 wir Markiert)
Wie verändere ich den Befehl, um den Inhalt von "D12" anstelle der Zeilenzahl (13) zu übernehmen.
Danach soll das Makro die Zeile dan Löschen.

Vielen Dank im voraus für die Hilfe
Viele Grüsse
Alles Gute
Julius

  

Re: Datenzeile markieren, löschen
von: andre
Geschrieben am: 22.04.2003 - 12:26:21

hallo julius
etwa so:
was=range("D12")
rows(was & ":" & was).select
gruss andre

  

Re: Datenzeile markieren, löschen
von: Martin Beck
Geschrieben am: 22.04.2003 - 12:29:47

Hallo Julius,

mit Ergebnisfeld meinst Du wohl eine Zelle in einer Tabellen. Versuche mal:


Sub Variabel_Zeile_loeschen()
z = Range("D11")
Rows(z).EntireRow.ClearContents
End Sub

Wenn Du nicht nur die Inhalte, sondern wirklich die ganze Zeile Löschen willst, mußt Du


Rows(z).EntireRow.ClearContents


durch

Rows(z).Delete ersetzen. Aber Vorsicht: in Deinem Beispiel wird aus Zelle D12 dann Zelle D11 und beim zweiten Durchlauf des Makros gibt's Probleme.

Gruß
Martin Beck

  

Kleine Korrektur
von: Martin Beck
Geschrieben am: 22.04.2003 - 12:32:05

Hallo Julius,

im Code muß es natürlich D12 und nicht D11 heißen.

Übrigen ist das Markieren der Zeile überflüssig, ich habe es daher im Code nicht berücksichtigt.

Gruß
Martin Beck

  

Re: Datenzeile markieren, löschen
von: Christian
Geschrieben am: 22.04.2003 - 12:32:19

Dim Zeile As Integer
Zeile = Cells(12, 4).Value 'Inhalt der Zelle D12
Rows(Zeile).Select
Selection.EntireRow.Delete 'Löschen der Zeile

Vorsicht, wenn Du das Makro zweimal ausführst, da D12 durch löschen der Zeile 5 zu D11 wird.

  

Re: Datenzeile markieren, löschen
von: Christian
Geschrieben am: 22.04.2003 - 12:42:05

Man könnte natürlich die Zeilenspalte mit einer Variablen i = 12
festlegen, die jedesmal wenn die Zeile < i um eins reduziert wird.

  

Re: Datenzeile markieren, löschen
von: Julius
Geschrieben am: 22.04.2003 - 15:45:50

Vielen Dank für die Hilfe.
Ich habe Andre´s Lösung genommen.
Klappt alles bestens.
Danke aber auch für die anderen Vorschläge.
Ich habe sie mir ebenfalls notiert.
Bis dann.
Julius

 

Beiträge aus den Excel-Beispielen zum Thema "Datenzeile markieren, löschen"