Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

beliebig viele leere Spalten löschen

Forumthread: beliebig viele leere Spalten löschen

beliebig viele leere Spalten löschen
22.01.2004 15:28:16
Peter Feustel
Hallo Excel Experten,
ich bin nicht in der Lage, aus einem Tabellenblatt per VBA, die (beliebigen) leeren Spalten zu löschen.
Es wird mir anstelle der letzten leeren Spalte, die folgende (gefüllte) Spalte gelöscht, obwohl der .Delete auf die richtige Spalte verweist.
Vielleicht denke ich ja auch viel zu kompliziert mit meinem Makro, dann bitte ich um eine einfachere Lösung. Ich habe aber seltsamerweise auch kein ‚leere Spalten löschen’ in der Recherche gefunden. Oder habe ich nicht intensiv genug (mit falschem Suchbegriff) gesucht?
Als Anlage meine Versuche – Alt + F8, dann Ausführen.
Für einen guten Hinweis schon einmal vielen Dank im voraus.
Gruß, Peter
https://www.herber.de/bbs/user/3134.xls
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: beliebig viele leere Spalten löschen
22.01.2004 15:33:42
K.Rola
Hallo,
Option Explicit

Sub Spalte_weg()
Dim Spalte As Integer
Application.ScreenUpdating = False
For Spalte = 256 To 1 Step -1
If Application.CountA(Columns(Spalte)) = 0 Then
Columns(Spalte).Delete
End If
Next
Application.ScreenUpdating = True
End Sub

Gruß K.Rola
Anzeige
AW: danke, ich hab zu kompliziert gedacht
22.01.2004 16:20:17
Peter Feustel
Hallo K.Rola,
danke, ich habe die Sache wohl zu kompliziert angegangen.
Gruß, Peter
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Leere Spalten in Excel effizient löschen


Schritt-für-Schritt-Anleitung

Um in Excel leere Spalten zu löschen, kannst du entweder manuell vorgehen oder ein VBA-Makro verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung für die Verwendung eines Makros:

  1. Öffne Excel und gehe zu dem Tabellenblatt, aus dem du die leeren Spalten löschen möchtest.

  2. Drücke Alt + F11, um den VBA-Editor zu öffnen.

  3. Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.

  4. Füge den folgenden VBA-Code in das Modul ein:

    Sub Spalte_weg()
       Dim Spalte As Integer
       Application.ScreenUpdating = False
       For Spalte = 256 To 1 Step -1
           If Application.CountA(Columns(Spalte)) = 0 Then
               Columns(Spalte).Delete
           End If
       Next
       Application.ScreenUpdating = True
    End Sub
  5. Schließe den VBA-Editor und kehre zu Excel zurück.

  6. Drücke Alt + F8, wähle Spalte_weg aus und klicke auf Ausführen.

Dieses Makro durchläuft alle Spalten von rechts nach links und löscht jede Spalte, die leer ist.


Häufige Fehler und Lösungen

  • Problem: Das Makro löscht die falschen Spalten.

    • Lösung: Stelle sicher, dass du die Spalten von rechts nach links durchläufst (Step -1). Dies verhindert, dass sich die Spaltenindizes während der Löschung ändern.
  • Problem: Die Schaltfläche Ausführen bleibt inaktiv.

    • Lösung: Vergewissere dich, dass du das Makro korrekt erstellt und gespeichert hast. Prüfe auch, ob die Sicherheitsstufe für Makros in den Excel-Optionen korrekt eingestellt ist.

Alternative Methoden

Wenn du keine VBA-Lösungen verwenden möchtest, gibt es auch manuelle Methoden, um leere Spalten zu löschen:

  1. Manuelles Löschen:

    • Markiere die leeren Spalten, klicke mit der rechten Maustaste und wähle Löschen.
  2. Filter verwenden:

    • Setze einen Filter auf deine Daten und filtere nach leeren Zellen. Markiere und lösche dann die entsprechenden Spalten.

Praktische Beispiele

Angenommen, du hast ein Excel-Dokument mit mehreren Spalten, von denen einige leer sind. Du kannst das oben genannte Makro verwenden, um alle leeren Spalten effizient zu entfernen. Alternativ dazu kannst du auch die Filter-Methode für eine schnelle visuelle Überprüfung nutzen.


Tipps für Profis

  • Verwende Tastenkombinationen: Um schneller zu arbeiten, nutze Strg + Leertaste, um eine ganze Spalte zu markieren, gefolgt von Strg + -, um sie zu löschen.
  • Speichere dein Makro: Wenn du regelmäßig leere Spalten löschen musst, speichere dein Makro in der Personal.xlsb, um es in jedem neuen Excel-Dokument verwenden zu können.

FAQ: Häufige Fragen

1. Wie kann ich mehrere Spalten in Excel löschen?
Verwende die Methode Markieren > Rechtsklick > Löschen, um mehrere Spalten gleichzeitig zu entfernen. Alternativ kannst du das Makro anpassen, um spezifische Spalten zu löschen.

2. Gibt es eine Möglichkeit, leere Seiten in Excel zu löschen?
Ja, du kannst leere Arbeitsblätter in Excel löschen, indem du mit der rechten Maustaste auf das Tab des Arbeitsblatts klickst und Löschen auswählst.

3. Welche Excel-Version benötige ich für das VBA-Makro?
Das VBA-Makro funktioniert in den meisten modernen Excel-Versionen, einschließlich Excel 2010, 2013, 2016 und 2019. Achte darauf, dass Makros in deinen Excel-Optionen aktiviert sind.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige