Live-Forum - Die aktuellen Beiträge
Datum
Titel
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
13.10.2025 12:24:02
Zählen in Abhängigkeit einer Jahreszahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1012to1016
1012to1016
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalten mit Farbe ausblenden

Forumthread: Spalten mit Farbe ausblenden

Spalten mit Farbe ausblenden
08.10.2008 20:13:58
Pet

Wünsche allen einen guten Abend.
Habe mal wieder ein Problem!
Ich brauche ein Makro, welches mir Spalten mit der Hintergrundfarbe gelb ausblendet.
durchsucht wird nur Zeile 2 von A:AR.
Vorab vielen Dank für Eure Hilfe.
Gruß
Pet
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Spalten mit Farbe ausblenden
08.10.2008 20:21:48
Hajo_Zi
Hallo Pet,
Farbe mittels bedingter Formatierung oder Farbpalette?

AW: Spalten mit Farbe ausblenden
08.10.2008 20:24:18
Pet
Hallo Hajo,
mittels Farbpalette.
Danke
Pet
AW: Spalten mit Farbe ausblenden
08.10.2008 20:33:03
Hajo_Zi
Hallo Pet,

Option Explicit
Sub Pet()
Dim InI As Long
Application.ScreenUpdating = False
For InI = 1 To 44
Columns(InI).EntireColumn.Hidden = Cells(2, InI).Interior.ColorIndex = 6
Next InI
Application.ScreenUpdating = tru
End Sub


Gruß Hajo

Anzeige
AW: Spalten mit Farbe ausblenden
08.10.2008 20:44:29
Pet
Hallo Hajo,
vielen Dank für deine Mühe, allerdings bekomme ich eine Fehlermeldung bei tru
Application.ScreenUpdating = tru
Fehler beim Kompilieren. Variable nicht definiert.
Gruß
Pet
Hab's gefunden !
08.10.2008 20:50:00
Pet
Hallo Hajo,
hab den Fehler schon gefunden.
Es fehlte einfach ein "e" an dem tru.
Hab nochmals vielen Dank für deine Hilfe !
Schönen Abend noch
Gruß
Pet
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Spalten mit Farbe ausblenden in Excel

Schritt-für-Schritt-Anleitung

Um Spalten mit einer bestimmten Hintergrundfarbe in Excel auszublenden, kannst Du ein einfaches Makro verwenden. Dieses Beispiel funktioniert in Excel-Versionen, die VBA unterstützen. Folge diesen Schritten:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf "Einfügen" und wähle "Modul".

  3. Füge den folgenden Code in das Modul ein:

    Option Explicit
Sub AusblendenGelbeSpalten()
   Dim InI As Long
   Application.ScreenUpdating = False
   For InI = 1 To 44
       Columns(InI).EntireColumn.Hidden = Cells(2, InI).Interior.ColorIndex = 6
   Next InI
   Application.ScreenUpdating = True
End Sub

  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Führe das Makro aus, indem Du ALT + F8 drückst, das Makro "AusblendenGelbeSpalten" auswählst und auf "Ausführen" klickst.

Häufige Fehler und Lösungen

  • Fehlermeldung "Variable nicht definiert": Dieser Fehler tritt auf, wenn Du einen Tippfehler im Code hast. Achte darauf, dass die Zeile Application.ScreenUpdating = True korrekt geschrieben ist. Der Fehler kann durch ein fehlendes „e“ bei „tru“ verursacht werden.

  • Makro lässt sich nicht ausführen: Stelle sicher, dass Du in den Excel-Optionen die Ausführung von Makros erlaubt hast. Gehe zu "Datei" → "Optionen" → "Sicherheitscenter" und ändere die Einstellungen für Makros entsprechend.

Alternative Methoden

Falls Du kein Makro verwenden möchtest, kannst Du auch die bedingte Formatierung nutzen, um Spalten visuell hervorzuheben oder auszublenden. Allerdings ist das Ausblenden von Spalten basierend auf der Farbe ohne VBA nicht direkt möglich.

  1. Markiere die gewünschte Zelle in der zweiten Zeile.
  2. Wähle "Bedingte Formatierung" im Menü.
  3. Erstelle eine Regel, die die Zellen mit der gewünschten Farbe hervorhebt. Beachte, dass dies nur eine visuelle Hervorhebung ist und nicht das tatsächliche Ausblenden der Spalten bewirkt.

Praktische Beispiele

Hier sind einige Anwendungsbeispiele für das Ausblenden von Spalten:

  • Du hast eine Excel-Tabelle mit Verkaufszahlen, und die Spalten, die für bestimmte Produkte nicht mehr relevant sind, sind gelb markiert. Mit dem Makro kannst Du diese Spalten schnell ausblenden, um die Übersichtlichkeit zu erhöhen.

  • In einem Bericht könnte es sinnvoll sein, vertrauliche Informationen in gelben Spalten auszublenden, während Du den Rest der Daten sichtbar lassen möchtest.

Tipps für Profis

  • Anpassen des Makros: Du kannst das Makro anpassen, um auch andere Farben auszublenden. Ändere dazu den ColorIndex im Code. Zum Beispiel, um rote Spalten auszublenden, verwende Cells(2, InI).Interior.ColorIndex = 3.

  • Performance-Optimierung: Bei großen Datenmengen kann die Ausführung von Makros lange dauern. Überlege, die Schleife nur auf die tatsächlich genutzten Spalten anzuwenden, anstatt auf alle 44.

FAQ: Häufige Fragen

1. Wie kann ich das Makro speichern?
Um das Makro zu speichern, speichere die Excel-Datei im .xlsm-Format (Excel-Arbeitsmappe mit Makros), damit das Makro auch beim nächsten Öffnen verfügbar bleibt.

2. Kann ich das Makro auch für andere Farben verwenden?
Ja, Du kannst den ColorIndex im Makro anpassen, um Spalten mit anderen Farben auszublenden. Suche die Farbnummer, die Du verwenden möchtest, und ändere sie im Code.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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