Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 09:31:31
Bild "In Zelle platzieren"
25.04.2024 09:23:47
Spalten in Kreuztabelle hinzufügen/löschen je nach Vorgabe
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1520to1524
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
1520to1524
1520to1524
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
09.11.2016 20:56:42
Felix
Hi zusammen,
ich habe mich hier bereits über Makros zum löschen von Zeilen informiert:
https://www.herber.de/forum/archiv/616to620/617078_Makro_zum_Zeilen_loeschen.html
Mein Problem ist aber ein etwas anderes ich habe eine doch sehr umfangreiche excel Datei habe (rd. 100 MB) wobei ich über (https://www.herber.de/forum/archiv/1380to1384/1381833_Tabellenblatt_Datengroee.html) dieses Makro glaube ich die Problematik gefunden habe.
Ein Tabellenblatt hat die Werte: wsh.UsedRange.CountLarge = 17179803648
Mein Problem ist nun aber, dass ich in diesem Blatt rein gar nichts löschen kann. Sobald ich das Makro anwerfe oder auch nur eine Zeile lösche bekomme ich die Fehlermeldung, dass nicht genügend RAM vorhanden ist. (Win7 64Bit mit 8GB RAM)
Nun zur Frage. Irgendjemand eine Idee wie ich hier vorgehen könnte um dem Problem Herr zu werden? Das Blatt zu löschen und ein neues anzulegen kommt leider nciht in Frage da es sich in unzählige andere Blätter weiter verformelt.
Bin für alle Tipps dankbar.
Grüße Felix

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

Betreff
Datum
Anwender
Anzeige
AW: Makro zum Zeilen löschen
09.11.2016 21:16:27
Michael
Hi Felix,
ein Tabellenblatt hat 1048576 Zeilen und 16384 Spalten; multipliziert sind das 17179869184, also 65K mehr als Dein Wert...
Ich kann mir nicht vorstellen, daß die Tabelle tatsächlich soooo viele Werte enthält; vielleicht hast Du mal versehentlich "ziemlich rechts unten" ein Leerzeichen reingesetzt...
Laß Dir halt mal wsh.UsedRange.Address ausgeben, dann siehst Du, welche Zelle u.re. einen Wert enthält.
Schöne Grüße,
Michael
AW: Makro zum Zeilen löschen
09.11.2016 22:04:18
Felix
Ok jetzt habe ich das Makro noch einmal durchlaufen lassen. Jetzt sind wir am Ende angekommen:
wsh.UsedRange.Address: $1:$1048576
wsh.UsedRange.CountLarge: 17179869184
Wenn ich die Zeile löscht ändert sich nichts dran. Muss zugeben ich habe keinen Plan warum
Anzeige
AW: Makro zum Zeilen löschen
10.11.2016 14:12:25
Michael
Hi,
hm, hm.
Ich habe mal in A1 und rechts unten XFD[unterste Zeile] ein x reingesetzt: dann gibt usedrange.address das Gleiche aus wie bei Dir.
Aber wenn da nicht wirklich was steht, scheint irgendwie das Tabellenblatt verhunzt zu sein.
Du willst die Daten wegen der vorhandenen Links ja nicht wegkopieren, aber das geht schon: 
- Bereich markieren
- Mauszeiger über oberen Rand stellen, bis dieses Verschiebekreuz erscheint
- linke Maustaste drücken und gedrückt lassen,
- dann kannst Du einen Bereich innerhalb des Blattes umpositionieren oder
- mit zusätzlich gedrückter Alt-Taste auf ein anderes (neues, leeres Blatt) setzen
(*)
- dann das Ur-Blatt auf einen nicht vorhandenen Namen umbenennen (ggf. später löschen) und
- das neue Blatt auf den alten Namen setzen
- und ggf. Makros, die im Tabellenmodul stehen, über die Zwischenablage zum neuen Blatt kopieren

(*) in beiden Fällen werden die in anderen Blättern vorhandenen Formeln automatisch angepaßt!
Der Makrorekorder zeichnet dabei .cut und .paste auf.
Schöne Grüße,
Michael
Anzeige
AW: Makro zum Zeilen löschen
10.11.2016 15:10:33
Felix
Hi und danke für die Hilfe,
ja scheinbar war das Blatt wirklich verhunzt ich habe mit die Mühe gemacht und es tatsächlich neu verformelt aber einfach damit, dass ich mit suchen und ersetzen die Formel angepasst habe, dass ging uneigentlich sehr gut.
Am meisten hat aber gebracht die Datei als XLB abzuspeichern. Die Datei öffnet sich nun in 10 sek statt 3 Minuten und hat sich von 100MB auf 60MB reduziert.
Grüße
freut mich,
10.11.2016 15:38:19
Michael
Felix,
das ist doch was!
Danke für die Rückmeldung und frohes Schaffen,
Gruß zurück,
Michael

315 Forumthreads zu ähnlichen Themen

Zelle nichtleer, dann Spalten ausblenden
kellerkind42

hallo.
Ich tue mich sehr schwer mit folgendem Wunsch:
Im Spaltenbereich A-Z:
Im Zeilenbereich 10 -20:
z.B:
Steht in Spalte C etwas in Zeile 10 oder 11 oder 12.... dann Blende diese Spalte aus!
Kann mir bitte jemand auf die Sprünge helfen?
Gruß Reinhardt.
20.08.2008 07:29:00
Thread-ID: 1003062
6 Beiträge
Anzeige
wenn > Spalte I, dann neue Zeile
Dennis

Hallo Leute,
ich benötige einmal Hilfe eines Experten, da ich noch in den Anfängen stecke.
Ich habe folgendes Problem:
Ich habe eine Liste mit Datensätzen (jeder Datensatz steht für eine Person). Die Datensätze sind unterschiedlich lang. Grds. sind die Datensätze von Spalte A - Spal...
04.09.2008 16:41:00
Thread-ID: 1007458
8 Beiträge
Wenn in Zelle folgender String, dann
mehmet

Hallo Forum,
In Spalte G4:G92 sind viele kodierte Zeichenfolgen.
Fest steht aber, dass diese zu erkennen sind, z.B.
in Zelle G4: METAR EKAH 052150Z AUTO 12005KT 9999NDV DZ OVC080/// 15/14 Q1005=
in Zelle G5: METAR ESSA 051940Z 20006KT CAVOK 11/10 Q1006 NOSIG=
und so weiter.....
06.09.2008 01:08:00
Thread-ID: 1007801
16 Beiträge
Anzeige
Wenn kein Optionsfeld ausgewählt dann MsgBox
Bernhard

Hallo liebe Excel Freunde!
Wer kann mir bitte helfen? Ich habe eine UF mit 2 Optionsfeldern. Ich möchte einen Hinweis mit einer MsgBox bekommen, wenn keines der beiden Optionsfelder ausgewählt wurde.
Wie mache ich das in VBA?
Danke für Eure Hilfe
Gruss
Bernhard
09.09.2008 11:32:23
Thread-ID: 1008391
5 Beiträge
VBA- Autofilter - leere Zeilen löschen
Asits

Hallo,
ich habe in der Spalte "A" Kundennummern stehen.
Ich will per Makro / Autofilter die kompletten Zeilen
derjehnigen Kunden löschen, die noch keine Kundennummer haben.
wie mache ich das ?
Vielen Dank vorab!
17.09.2008 08:48:00
Thread-ID: 1010225
5 Beiträge
Wenn Zelle leer, dann Grafik löschen
TomTom

Hi,
ich möchte auf meinem Sheet abprüfen, ob die Zelle A41 und B41 leer sind, und wenn ja, soll eine Grafik (.bmp / wurde eingefügt mit Kopieren und einfügen und heisst im Namensfeld "Bild 01")
gelöscht oder unsichtbar werden.
Wie mache ich dies ?
Danke mal
Gruss
Tom<...
22.09.2008 08:28:10
Thread-ID: 1011373
3 Beiträge
Makro unterbrechen wenn bestimmte Zelle leer
WalterK

Guten Morgen,
wer kann mir beim folgenden Code eine kleine Änderung durchführen:
1.) das Makro sollte abgebrochen werden, wenn im Blatt "Daten" die Zelle "AB12" leer ist und
2.) es sollte eine MsgBox mit dem Hinweis kommen, dass die Eingabe bei "AB12" fehlt und das sollte mit OK bes...
03.10.2008 07:29:45
Thread-ID: 1013985
10 Beiträge
Zählen wenn Zelle nicht leer
Tim

Hallo Forum,
wie kann ich in einem Bereich (z.B. A1:A50) die Anzahl der Zellen, in denen ein Eintrag vorhanden ist (Text oder Zahl) zählen?
Gruß
Tim
20.10.2008 11:47:00
Thread-ID: 1017617
3 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
5
5
7
15
5
4
4
2
9
2
2
7
3
7
3
7
1
3
4
23
4
7
4
3
7