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

komplette Gruppierung aufheben

Forumthread: komplette Gruppierung aufheben

komplette Gruppierung aufheben
19.07.2023 10:30:41
Tim
Guten Morgen zusammen,

ich erhalte täglich einen Report dessen Inhalt mehrfach gruppiert ist und ich diese aufheben möchte.

Dazu habe ich im Forum folgendes gefunden, jedoch erhalte ich im Lauf die Fehlermeldung "Laufzeitfehler 1004" wobei ich dachte, dass genau das damit unterbunden wird.

Ziel soll sein wirklich alle Gruppierungen aufzuheben.

Do Until onError
With Sheet_Export
.Rows.Ungroup
End With
Loop
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: komplette Gruppierung aufheben
19.07.2023 11:18:02
Rudi Maintaire
Hallo,
nicht schön, wirkt aber:
Sub aaa()
  On Error GoTo ERREXIT
  Do
    Rows.Ungroup
  Loop
ERREXIT:
End Sub
Gruß
Rudi

AW: komplette Gruppierung aufheben
19.07.2023 12:57:52
Tim
Vielen Dank Rudi, es funktioniert wie gewünscht.

AW: komplette Gruppierung aufheben
19.07.2023 13:29:04
Daniel
etwas schöner, weil ohne Sprung

On Error Resume Next
Do
    Rows.UnGroup
Loop While Err = 0
On Error Goto 0
Gruß Daniel

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum