Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zeile löschen!

Forumthread: Zeile löschen!

Zeile löschen!
ralle
hallo zusammen,
habe unter Excel folgendes für Euch sicher Einfaches Problem:
Habe eine Liste mit den spaltenüberschriften Name, Vorname usw.
Wenn nun in der Spalte A "Name" steht, soll die ganze Spalte gelöscht werden.
Wie stelle ich soetwas an.
Vielen Dank für Eure Hilfe!!
Wünschen allen Frohe Ostertage !!!!
Gruß
ralle
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zeile löschen!
ChrisL
Hi Ralle

Sub Löschen()
Dim iZeile As Long
For iZeile = Range("A65536").End(xlUp).Row To 1 Step -1
If Cells(iZeile, 1) = "Name" Then Rows(iZeile).EntireRow.Delete
Next iZeile
End Sub

Gruss
Chris
AW: Zeile löschen!
Fabio
Hi Ralle,
probiers mal damit:

Sub Name_löschen()
Dim a
a = Name
If Range("A1").Value = "Name" Then
Range(Cells(1, 1), Cells(65536, 1)).Delete
End If
End Sub

Grüße FABIO
Anzeige
AW: Zeile löschen!
ChrisL
Hi Fabio
OK, du hast die Frage etwas anders aufgefasst, war auch nicht ganz klar. Aber wozu du die Variable "a" brauchst verstehe ich nicht ganz ;-)
Ferner solltest du Variabeln immer korrekt dimensionieren. "Dim a" ohne Zusatz bedeutet dass die Variable als "Variant" deklariert ist, wäre in diesem Fall aber eher ein String...

Sub Name_löschen()
Dim a As String
a = "Name"
If Range("A1").Value = a Then Columns(1).Delete
End Sub

Gruss
Chris
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige