Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 09:22:48
VBA Filter in intelligenter Tabelle funktioniert nicht
18.04.2024 08:54:52
automatisches übertragen von Daten
18.04.2024 08:16:13
Dynamische Positionsnummerierung
18.04.2024 08:15:33
Seitwärts scrollen - Fenster fixiert
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
616to620
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
616to620
616to620
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro zum Zeilen löschen

Makro zum Zeilen löschen
28.05.2005 21:37:09
Josef
Hallo zusammen,
möchte mit unten stehenden Makro, alle gefüllten Zeilen wo in Zelle "A" ein Wert drin steht, löschen. (Zeilen nicht Werte) Am besten von unten nach oben, da ich "A1" bis "A7" nicht verändern darf, weil damit immer wieder neu begonnen wird.
Kann mir dabei jemand helfen?
Range(Cells(8, 1), Range("a65336").Offset(1, 0).End(xlUp)).Select
Danke schon mal im Voraus
Gruß Josef

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro zum Zeilen löschen
28.05.2005 21:39:50
Hajo_Zi
Hallo Josef,
hattest Du nicht schon in einem anderen Beitrag geschrieben das dies Problem gelöst ist?
Warum ein neuer Beitrag?
Es Klang im letzten Beitrag auch so das Du froh bist was selbst zu erstellen darfst?
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


AW: Makro zum Zeilen löschen
29.05.2005 08:18:43
Hajo_Zi
Hallo Josef,
Du hast nun schon soviele gute Tips von Herbert und Bert bekommen, aber ich möchte Dir nun auch noch einen Code posten. Schneller geht es, wenn Du nicht jede Zeile einzeln löscht.
Option Explicit

Sub Spalte_A()
Dim LoLetzte As Long
Dim LoI As Long
Dim RaZeile As Range
LoLetzte = IIf(IsEmpty(Range("A65536")), Range("A65536").End(xlUp).Row, 65536)
If LoLetzte < 8 Then Exit Sub
For LoI = LoLetzte To 8 Step -1
If Cells(LoI, 1) <> "" Then
If RaZeile Is Nothing Then
Set RaZeile = Rows(LoI)
Else
Set RaZeile = Union(RaZeile, Rows(LoI))
End If
End If
Next LoI
RaZeile.Delete
End Sub

Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.
Anzeige
AW: Makro zum Zeilen löschen
29.05.2005 16:01:42
Josef
Hallo Hajo,
zuerst mal vielen Dank für das Makro.
Ich hätte Dir meine Gedanken (muß ich doch selber hinbekommen), nicht schreiben sollen.
Damit habe ich sicherlich für etwas Verwirrung gesorgt. Sorry!
Gruß Josef
AW: Makro zum Zeilen löschen
28.05.2005 22:58:27
Fred
Hi,
Option Explicit

Sub weg()
Dim z As Long, lz As Long
lz = IIf(Cells(Rows.Count, 1) <> "", Rows.Count, Cells(Rows.Count, 1).End(xlUp).Row)
For z = lz To 9 Step -1
If Not IsEmpty(Cells(z, 1)) Then Rows(z).Delete
Next
End Sub

mfg Fred
AW: Makro zum Zeilen löschen
28.05.2005 23:48:46
Josef
Hallo Fred,
werde wohl Dein Makro verwenden.
Danke Dir für Deine Mühe
Gruß
Josef
Anzeige

113 Forumthreads zu ähnlichen Themen

Makro läuft nicht. Zeile löschen wenn...
Christoph

Hallo,
ich habe eine große Tabelle und möchte die Zeilen löschen, die eine "1" in Spalte O:O haben.
Ich habe auch hier und in anderen Foren eine Reihe Makros gefunden. Unter anderem dieses hier:
Sub loeschen() Dim loZeile As Long Application.ScreenUpdating = False For loZeile = 12...
01.07.2009 13:38:55
Thread-ID: 1085695
10 Beiträge
Anzeige
Makro langsam - Spalten löschen und Format
F.

Hallo zusammen
Das folgende Makro habe ich für acht Buchungskreise zusammengebastelt (mir Eurer Hilfe). Alles befindet sich in der gleichen Arbeitsmappe.
Jeder Kreis hat ein Berechnungsblatt und ein Datenblatt. Im Ersteren befindet sich eine Schaltfläche. Diese wird für jeden Kreis ei...
22.07.2009 12:31:31
Thread-ID: 1090484
7 Beiträge
Makro gezielte Zeilen löschen / kopieren
walter

Hallo und guten Abend,
bzgl. einer Optimierungsgeschichte bräuchte ich bitte mal wieder Hilfe:
Datentabelle mit variabler Länge
a) unvollständige Sätze kopieren und in neues Blatt einkopieren, dann diese unvollständigen Sätze löschen (würde ich evtl. mit viel Schweiß selbst noch geb...
23.08.2009 00:48:36
Thread-ID: 1097980
8 Beiträge
Anzeige
Zellen verschieben/Zeilen löschen VBA
Thomas

Liebes Forum,
ich habe folgendes Problem
Ich habe eine Excel Datei mit den beiden Spalten Name und Wahlpflichtfach und möchte die Fächerkombinationen auszählen lassen.
Nun ist mir die Tabelle aber leider so gegeben worden, dass diesselbe Person immer doppelt aufgeführt ist. Einmal...
07.11.2009 14:43:44
Thread-ID: 1115212
5 Beiträge
Makro - Nullstellen - Zeilen löschen
Vohnkar

Schönen Sonntag liebe Experten,
Ich habe schon ein bisschen mit VBA gearbeitet, allerdings nur mit Macrorecorder. Ich glaube, was ich gerade erreichen will benötigt ein Macro, da über die Möglichkeiten des Recorders hinausgeht.
Ich möche in einem Excel-Sheet alle Zeilen entfernen, in de...
06.12.2009 13:38:30
Thread-ID: 1122059
5 Beiträge
VBA Profis: Leerzeile in Textdatei löschen
Joe

Hallo,
habe folgendes Makro "ZeileLöschenLangsam" gefunden um leere Zeilen in einer Textdatei zu löschen.
Das ganze funktioniert, aber dauert bei großen TextDateien (>20.000 Zeilen) extrem lange.
Ich habe deshhalb das Makro "ZeileLöschenSchnell" geschrieben welches nur wenige Se...
11.02.2010 23:36:52
Thread-ID: 1137630
2 Beiträge
Löschen von Zeilen mit Makro
Zeilen

Hallo und guten Abend,
ich habe schon wegen dem Thema Zeilen löschen gesucht und bin fündig geworden, jedenfalls was das Löschen von leeren Zeilen angeht.
Nun möchte ich aus meiner Tabelle Zeilen löschen, die einen Wert nicht wiedergeben. Die Tabelle bezieht sich auf ein weiteres Tabell...
13.02.2010 01:45:21
Thread-ID: 1138255
5 Beiträge
Ganze Zeile löschen bei Auswahl mehrerer Tabellen
Peter

Guten Tag
Mit nachfolgendem Code lösche ich die ganze Zeilen der aktiven Markierung.
Nun kommt es vor, dass ich gleichzeitig mehrere Tabellen ausgewählt habe und diese Aktion für alle ausgewählten Tabellen gelten sollte.
Wie muss ich den Code erweitern?
Gruss, Peter
'ganze Z...
12.04.2010 15:02:34
Thread-ID: 1151205
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
9
4
6
7
4
4
4
1
4
4
12
6
2
25
3
6
19
6
11
2
4
6
9
9
10