Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1428to1432
1428to1432
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Excel hängt beim Zeilen löschen und Zurück

Forumthread: Excel hängt beim Zeilen löschen und Zurück

Excel hängt beim Zeilen löschen und Zurück
08.06.2015 09:50:01
Django
Hallo zusammen,
habe ein kleines Problem.
Ich habe mittlerweile eine Arbeitsmappe mit sehr vielen Arbeitsblättern und auch vielen Makros.
Wenn ich nun in der Mappe arbeite und Zeilen hinzufügen/löschen möchte, reagiert Excel lange gar nicht. Das gleiche gilt für Spaalten und beim Zurück gehen.
Hat jemand ne Anhnung wo ran das liegen könnte? Ist das einfach ein Zeichen für zu viel Rechenaufwand für den PC? Oder macht da vll ein Makro murks?
Besten Dank

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel hängt beim Zeilen löschen und Zurück
08.06.2015 10:00:42
Daniel
Hi
wenn du eine Zeile löschst, führt Excel eine automatische Neuberechnung der Formeln aus, sowie das Change-Event des Tabellenblatts und die Calculate-Events aller Blätter, auf denen diese Änderung eine Neuberechnung auslöst.
Ausserdem muss Excel in allen geöffneten Datein überprüfen, ob Formeln und Namen vorhanden sind, die sich auf den Zellbereich den du bearbeitest hast beziehen und dort die Zellbezüge entsprechend abändern.
je nach dem wievile Formeln von der Änderung betroffen sind und welche Makros laufen müssen, kann das schon ne weile dauern.
Gruß Daniel

Anzeige
AW: Excel hängt beim Zeilen löschen und Zurück
08.06.2015 10:32:25
Klexy
Ich weiß nicht, wie Excel 365 funktioniert, aber bei 2007/2010/2013 gibt es ein massives Problem mit den bedingten Formatierungen.
Wenn du welche drin hast, vor allem wenn du Zeilen löscht und einfügst, liegt es zu 99,9% daran.
Dabei vervielfachen sich die bedingten Formatierungen nämlich, was Excel über kurz oder lang in die Knie zwingt.
Ich verwende dieses Makro zur Bereinigung. Die bedingten Formatierungen werden überall außer in der ersten Zeile gelöscht und dann neu auf den Rest der Tabelle aufgetragen.
Sub Bedingte_Formatierungen_reparieren_Standard()
' für eine ordentliche Tabelle:
' - Tabelle beginnt in Zelle A1
' - Zeile 1 enthält die Spaltenköpfe
' - Tabelle enthält keine Leerzeilen oder Leerspalten
' - unter der Tabelle darf nix stehen
' - rechts neben der Tabelle darf was stehen
Dim Die1 As Range, Tabellenbreite As Double, Tabellenlänge As Double
Set Die1 = Range("A2")
Tabellenbreite = Die1.Offset(-1, 0).End(xlToRight).Column
Tabellenlänge = ActiveSheet.UsedRange.Rows.Count
MsgBox Tabellenlänge
Range(Die1.Offset(1, 0), Die1.Offset(Tabellenlänge + 10, Tabellenbreite - 1)). _
FormatConditions.Delete
'Die1.Select
Range(Die1, Die1.Offset(0, Tabellenbreite - 1)).Copy
Range(Die1, Die1.Offset(Tabellenlänge + 10, Tabellenbreite - 1)).PasteSpecial Paste:= _
xlPasteFormats
Application.CutCopyMode = False
End Sub

Anzeige
bed Format reparieren
08.06.2015 12:08:22
Rudi
Hallo,
nur nebenbei: 
Sub RepBedFormat()
With Cells(1, 1).CurrentRegion
.Offset(2).Resize(.Rows.Count - 2).FormatConditions.Delete
.Rows(2).Copy
.Rows(2).Resize(.Rows.Count - 1).PasteSpecial xlPasteFormats
End With
Application.CutCopyMode = False
End Sub
Gruß
Rudi

Anzeige
AW: bed Format reparieren
08.06.2015 13:21:50
Klexy
Das merk ich mir.
CurrentRegion hat was.

AW: Excel hängt beim Zeilen löschen und Zurück
10.06.2015 10:40:36
Django
Vielen Dank,
waren echt die ganzen bed. Formatierungen.
Grüße

AW: Excel hängt beim Zeilen löschen und Zurück
10.06.2015 12:49:07
Klexy
Eine der vielen durchdachten Verbesserungen in Office 2013.
Anzeige

Forumthreads zu verwandten Themen

Spalten lassen sich nicht auf Breite 0 schieben
Gordon

Moin,
ich versuche gerade per Makro bestimmte Spalten auf die Breite 0 zu schieben. Als es da fr mich unerklärliche Probleme gab, hab ich mal versucht, die Spalten per Hand auf Breite null zu schieben und siehe da, folgende Meldung erscheint: "Objekte können nicht über das Blatt hinausver...
17.09.2008 14:10:57
Thread-ID: 1010385
4 Beiträge
Zu viele Zeilenverlängerungszeichen?
TommiH

Hallöchen,
ich habe grade versucht ein Makro aufzunehmen, in dem ich 4 Dateien einlese. Es sind ASCI-Dateien mit einem speziellen Trennzeichen # - wenn ich durch den Assistent gehe, dann kommt bei einer (die Größte) Datei irgendwann der Punkt mit dem Spaltenformat, wo ich Text auswähle (au...
24.09.2008 12:29:00
Thread-ID: 1012032
3 Beiträge
Zeilen lassen sich nicht ausblenden
Kurt

Guten Tag Zusammen,
ich habe folgendes Makro für das Ausblenden der Zeilen 23:50,
gebastelt.
Nun wollte ich die Aktion durchführen, leider werden die anderen
Tabellen die Zeilen nicht ausgeblendt nur die Active Tabelle.
Dann ist mit aufgefallen das ich die Zeilen oder auch...
21.01.2009 16:19:36
Thread-ID: 1042287
5 Beiträge
Kann Zeilen, die DA SIND, nicht mehr einblenden!!!
Stephan

Liebe Liste,
habe hier ein Problem, das mich fast verzweifeln läßt!
Ich habe 4 Zeilen am Anfang einer Datei, die sich partout nicht mehr einblenden lassen! Ich kann dort mit den Pfeiltasten der Tastatur hinlaufen, sehe oben in der Wertezeile auch den Wert der Zellen, in denen Inhalt ste...
25.01.2009 12:52:00
Thread-ID: 1043550
11 Beiträge
Zeilen löschen, wenn in Spalte A nicht fett?
Selma

Hallo Leute,
ich möchte ab Zeile 1 bis Zeile 5000 folgende Zeilen löschen:
Wenn in Spalte A die Zelle leer ist, dann Zeile löschen
Wenn in Spalte A die Zelle gefüllt ist, aber nicht fett ist, dann die Zeile löschen.
Wie mache das per VBA ?
Besten Dank im Voraus !
VG,
...
28.07.2009 22:58:24
Thread-ID: 1092081
7 Beiträge
Shape / Picture löschen funktioniert nicht
Jens

Hallo zusammen,
ich habe da ein Makro, welches in verschiedenen Zellen abhängig vom Inhalt ein Bild einfügt. Am Anfang des Makros sollen alle Bilder gelöscht werden, da sich die Inhalte der Zellen ständig ändern.
Code:
Sub bilder()
Dim zeile, abstand, hoehe As Integer
D...
23.09.2009 22:30:32
Thread-ID: 1105079
5 Beiträge
Wirklich leere Zeilen löschen
Markus

Hallo,
verschiedene Makro's die ich im Archiv gefunden haben,
lösen nicht mein Problem.
Ich möchte alle Zeilen im aktuellen Sheet löschen, aber nur dann wenn,
keine Formeln, keine Werte und keine Formatierungen (z.B. Zellen gelb hinterlegt), keine Kommentare in den entsprechende...
30.09.2009 14:36:43
Thread-ID: 1106327
4 Beiträge
Anzeige
Löschen funktioniert nicht
Kai

Hallo,
möchte alle DS löschen (ab Zeile 3) , die in Spalte X kein "Auto" stehen haben.
Dim i
For i = 1 To 100
If Cells(i, 24).Value "Auto" Then _
Cells(i, 1).EntireRow.Delete
Next i
Problem 1: irgend wie funktioniert der Code nicht richtig, er löscht immer nur die u...
19.11.2009 13:02:10
Thread-ID: 1118590
8 Beiträge
Spalten lassen sich nicht einblenden?
Reinhard

Hallo Wissende,
wegen einer Anfrage zu einem anderen problem bekam ich eine Mappe.
In Tabelle1 sind die Spalten D und E ausgeblendet.
Mir gelingt es nicht sie einzublenden.
Weder mit
Sub tt() Columns(4).Hidden = False Columns(5).Hidden = False End Sub oder manuell.
Blat...
01.03.2010 17:59:12
Thread-ID: 1142460
7 Beiträge
Anzeige
Zuviele Zeilen
Torsten

Hallo Forum,
ich habe eine CSV-Datei, welche mehr Zeilen hat, wie Excel anzeigen kann (65536). Gibt es einen Trick oder ein anderes Tool, um dieses Problem zu umgehen.
Was ich an Daten brauche, steht halt im nicht sichtbaren Bereich :-(
Vielen Dank für Eure Hilfe.
07.05.2010 08:53:26
Thread-ID: 1155997
5 Beiträge
ScrollArea -> Zeilen können nicht gelöscht werden
Holger

Hallo,
folgender Code:
Set MasterWorkbook = ActiveWorkbook
Set MasterWS = Worksheets("Shipments")
MasterWS.Activate
MasterWS.ScrollArea = "A1: W3000"
Nun stelle ich fest (ich habe es getestet), dass durch das Definieren einer ScrollArea keine Zeilen mehr gelöscht werden...
01.06.2010 13:32:48
Thread-ID: 1159807
10 Beiträge
ScrollArea -> Zeilen können nicht gelöscht werden
Holger

Hallo,
folgender Code:
Set MasterWorkbook = ActiveWorkbook
Set MasterWS = Worksheets("Shipments")
MasterWS.Activate
MasterWS.ScrollArea = "A1: W3000"
Nun stelle ich fest (ich habe es getestet), dass durch das Definieren einer ScrollArea keine Zeilen mehr gelöscht werden...
01.06.2010 13:33:36
Thread-ID: 1159813
2 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Excel hängt beim Zeilen löschen und Zurück

Schritt-für-Schritt-Anleitung

  1. Überprüfen der Arbeitsmappe: Wenn Du viele Arbeitsblätter in Deiner Excel-Datei hast, kann das die Leistung beeinträchtigen. Reduziere die Anzahl der offenen Arbeitsblätter, um die Performance zu verbessern.

  2. Bedingte Formatierungen: Oft führt eine Überlastung durch bedingte Formatierungen dazu, dass Excel beim Zeilen löschen hängt. Überprüfe, ob Du viele bedingte Formatierungen hast, und entferne unnötige. Du kannst dies mit dem folgenden VBA-Makro tun:

    Sub Bedingte_Formatierungen_reparieren_Standard()
   Dim Die1 As Range, Tabellenbreite As Double, Tabellenlänge As Double
   Set Die1 = Range("A2")
   Tabellenbreite = Die1.Offset(-1, 0).End(xlToRight).Column
   Tabellenlänge = ActiveSheet.UsedRange.Rows.Count
   Range(Die1.Offset(1, 0), Die1.Offset(Tabellenlänge + 10, Tabellenbreite - 1)).FormatConditions.Delete
   Range(Die1, Die1.Offset(0, Tabellenbreite - 1)).Copy
   Range(Die1, Die1.Offset(Tabellenlänge + 10, Tabellenbreite - 1)).PasteSpecial Paste:=xlPasteFormats
   Application.CutCopyMode = False
End Sub

  3. Makros deaktivieren: Deaktiviere testweise alle Makros, um festzustellen, ob sie das Problem verursachen. Gehe dazu in die Excel-Optionen und wähle die Registerkarte „Trust Center“.

  4. Neuberechnung der Arbeitsmappe: Setze die Berechnungsart auf manuell, bevor Du Zeilen löschst. Gehe zu "Formeln" und wähle „Manuell“ unter „Berechnungsoptionen“.

Häufige Fehler und Lösungen

  • Excel hängt beim Zeilen löschen: In vielen Fällen liegt es an der Anzahl der Formeln oder Makros, die beim Löschen einer Zeile neu berechnet werden müssen.

  • Leere Zeilen am Ende lassen sich nicht löschen: Manchmal ist dies auf versteckte Formate oder Daten zurückzuführen. Überprüfe den Bereich auf unsichtbare Inhalte.

  • Excel kann Zeile nicht löschen: Wenn eine Zeile nicht gelöscht werden kann, prüfe, ob die Zeile geschützt ist oder ob sich Formeln darauf beziehen.

Alternative Methoden

  • Leere Zeilen automatisch löschen: Verwende die folgende Formel, um leere Zeilen zu identifizieren und zu löschen:

    Sub LeereZeilenLöschen()
   Dim Zeile As Long
   For Zeile = ActiveSheet.UsedRange.Rows.Count To 1 Step -1
       If Application.WorksheetFunction.CountA(Rows(Zeile)) = 0 Then
           Rows(Zeile).Delete
       End If
   Next Zeile
End Sub

  • Filter verwenden: Du kannst auch Filter anwenden, um leere Zeilen anzuzeigen und diese dann manuell zu löschen.

Praktische Beispiele

  1. Leere Zeilen am Ende einer Tabelle löschen: Wenn Du eine Tabelle mit vielen leeren Zeilen hast, nutze das oben genannte VBA-Skript, um diese effizient zu entfernen.

  2. Bedingte Formatierungen reparieren: Verwende das in der Schritt-für-Schritt-Anleitung beschriebene Makro, um Deine Arbeitsmappe zu optimieren und das Problem des „Excel hängt“ zu lösen.

Tipps für Profis

  • Regelmäßige Bereinigung: Halte Deine Excel-Dateien sauber, indem Du regelmäßig nicht benötigte Zeilen und Spalten löschst. Dies kann die Performance erheblich verbessern.

  • Verwendung von Excel-Tabellen: Konvertiere Deine Daten in Excel-Tabellen (Tabelle -> Als Tabelle formatieren). Dies kann die Verwaltung und Leistung Deiner Daten verbessern.

  • Vermeide überflüssige Formatierungen: Reduziere die Anzahl der bedingten Formatierungen, um die Rechenleistung zu optimieren.

FAQ: Häufige Fragen

1. Warum dauert das Löschen von Zeilen in Excel so lange?
Das Löschen von Zeilen kann lange dauern, wenn viele Formeln oder Makros im Hintergrund aktiv sind, die neu berechnet werden müssen.

2. Was kann ich tun, wenn Excel sagt, dass die Zeile nicht gelöscht werden kann?
Überprüfe, ob die Zeile geschützt ist oder ob es formelbasiertes Verknüpfungen gibt, die das Löschen verhindern. Stelle sicher, dass die Zeile nicht Teil einer Tabelle ist, die eine Struktur hat.

3. Wie kann ich leere Zeilen in Excel schnell loswerden?
Du kannst VBA-Makros verwenden, um leere Zeilen automatisch zu löschen, oder Filter anwenden, um nur die leeren Zeilen anzuzeigen und diese dann zu entfernen.

Beliebteste Forumthreads (12 Monate)

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