Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 18:57:33
17.04.2024 16:56:58
Anzeige
Archiv - Navigation
1196to1200
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Löschen von bestimmten Zeilen, ohne eine Schleife

Löschen von bestimmten Zeilen, ohne eine Schleife
bestimmten
Hallo zuzsammen,
hat jemand hier eine Idee wie man alle Zeilen durch ein Makro löschen kann, bei denen in der Spalte J nichts ist (es gibt nur zwei Möglichkeiten, entweder ist da nichts oder Inhalt mit Standardformatierung, also keine Formeln) ohne dabei eine Schleife zu benutzen?
Grüße
AW: Löschen von bestimmten Zeilen, ohne eine Schleife
09.02.2011 09:39:42
bestimmten
Hallo paul,
warum benutzt Du nicht Autofilter? Kopiere den sichtbaren Bereich.

AW: Löschen von bestimmten Zeilen, ohne eine Schleife
09.02.2011 09:53:42
bestimmten
Hallo Hajo,
Danke für Deinen Tip
öhm..aber jetzt steh ich auf der Leitung :-(
Wie kann ich das mit Autofilter lösen?
Kenne diesen Filter nur für eine Sortierung..
Danke!
AW: Löschen von bestimmten Zeilen, ohne eine Schleife
09.02.2011 10:01:08
bestimmten
Hallo Paul,
bei Autofilter kannst du auch Bedingungen eingeben, unterer Teil.
Gruß Hajo
AW: Löschen von bestimmten Zeilen, ohne eine Schleife
09.02.2011 14:12:28
bestimmten
Dnake für die Antwort!
Autofilter wäre schon eine möglichkeit, wobei ich nciht weiß wie gut das automatisierbar ist. Dann ist es auch so, dass ich die Zeilen dann kopieren will und übertragen in eine anderes File.
Kennt keiner ein passendes Makro?
Anzeige
AW: Löschen von bestimmten Zeilen, ohne eine Schleife
09.02.2011 15:00:40
bestimmten
Hallo Paul,
Excel hat auch einen Makrorecorder.
Gruß Hajo
AW: Löschen von bestimmten Zeilen, ohne eine Schleife
09.02.2011 15:20:11
bestimmten
Hallo Paul,
ungetestet:
Sub Löschen()
On Error Resume Next
'Bereich anpassen
ActiveSheet.Range("J1:J1000")).SpecialCells(xlCellTypeBlanks).EntireRow.Delete Shift:= _
xlShiftUp
On Error Goto 0
End Sub
Gruß
Klaus

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige