Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Füllfarbe per VBA löschen

Forumthread: Füllfarbe per VBA löschen

Füllfarbe per VBA löschen
PeterO
Hallo Forum,
ich möchte in einem bestimmten Bereich den Inhalt und die Füllfarbe/Hintergrundfarbe der Zellen löschen. Das Löschen des Inhaltes klappt wunderbar, aber nicht das der Füllfarben.
Mein Code:
Range(Cells(zeile + 2, spalte + 2), Cells(zeile + 15, spalte + 2)).ClearContents
Range(Cells(zeile + 2, spalte + 2), Cells(zeile + 15, spalte + 2)).Interior.ColorIndex = xlNone

Wo ist mein Fehler in der 2. Zeile?
Gruß Peter
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Füllfarbe per VBA löschen
05.05.2011 10:02:43
Michel2010
Mh :-/
mit
Selection.Clear
löscht du alles mit einmal, Inhalt und Farbe
Gruß
Michael
AW: Füllfarbe per VBA löschen
05.05.2011 10:04:54
Sascha
hallo,...
ich hab deinen code gerad mal getestet, bei mir löscht er inhalt sowohl auch die hintergrundfarbe...
(B2:B15)
gruß
sascha
AW: Füllfarbe per VBA löschen
05.05.2011 10:06:05
mäxl
Hallo Peter
da ist kein Fehler, bzw kann ICH keinen sehen.
satt ClearContents
könntest du Clear verwenden
aber das würde auch Schriftart, Schriftgröße, Rahmen usw. entfernen.
wenn das nicht gewünscht ist, welche Fehlermeldung erscheint eigentlich bei Dir?
gruß
Mäxl
Anzeige
bedingte Formatierung?
05.05.2011 10:23:49
Erich
Hi Peter,
wurde die Hintergrundfarbe vielleicht per bedingter Formatierung erzeugt?
Dann müsstest du diese löschen. Probiers mal mit der Makroaufzeichnung!
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
AW: Füllfarbe per VBA löschen
05.05.2011 13:20:05
PeterO
Hallo an alle,
habe den Fehler gefunden. Es lag nicht am Code, wie Mäxl schon schrieb. Ich bin schlicht weg in der falschen Spalte gelandet... Ist mir aber erst aufgefallen, nachdem ich den Code von Michel eingegeben habe und dann bei einer Fehlermeldung der falsche Bereich markiert war... Manchmal ist man enfach blind...
Trotzdem Dank euch allen!
Gruß Peter
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Füllfarbe in Excel per VBA löschen


Schritt-für-Schritt-Anleitung

Um die Füllfarbe in Excel per VBA zu löschen, kannst du folgenden Code verwenden. Achte darauf, dass du die richtige Zelle auswählst:

Sub FüllfarbeLöschen()
    Dim zeile As Long
    Dim spalte As Long

    ' Beispielwerte für Zeile und Spalte
    zeile = 1
    spalte = 1

    ' Inhalt löschen
    Range(Cells(zeile + 2, spalte + 2), Cells(zeile + 15, spalte + 2)).ClearContents

    ' Füllfarbe löschen
    Range(Cells(zeile + 2, spalte + 2), Cells(zeile + 15, spalte + 2)).Interior.ColorIndex = xlNone
End Sub

Stelle sicher, dass du den Code an deine Bedürfnisse anpasst, insbesondere die Zeilen- und Spaltennummern.


Häufige Fehler und Lösungen

  1. Füllfarbe lässt sich nicht entfernen:

    • Wenn die Füllfarbe nicht entfernt wird, könnte es daran liegen, dass die Farbe über eine bedingte Formatierung gesetzt wurde. In diesem Fall musst du die bedingte Formatierung zuerst löschen.
  2. Falscher Bereich:

    • Achte darauf, dass du den richtigen Zellbereich angibst. Ein häufiger Fehler ist, in der falschen Spalte oder Zeile zu arbeiten, wie es Peter in seinem Beitrag festgestellt hat.
  3. Fehlermeldungen:

    • Wenn du eine Fehlermeldung erhältst, überprüfe den Code auf Syntaxfehler oder falsche Zellreferenzen.

Alternative Methoden

Eine Alternative zur Verwendung von VBA ist die Nutzung der Excel-Oberfläche:

  1. Wähle den Zellbereich aus, dessen Füllfarbe du entfernen möchtest.
  2. Klicke im Menü auf „Start“.
  3. Wähle im Bereich „Schriftart“ das Dropdown-Menü für die Füllfarbe und klicke auf „Keine Füllung“.

Diese Methode ist schnell, erfordert jedoch manuelles Eingreifen, während VBA automatisiert werden kann.


Praktische Beispiele

Hier sind einige praktische Beispiele, wie du die Füllfarbe in verschiedenen Szenarien löschen kannst:

  • Alle Zellen in einem bestimmten Bereich:

    Range("A1:B10").Interior.ColorIndex = xlNone
  • Nur die Zellen mit einer bestimmten Hintergrundfarbe:

    Dim cell As Range
    For Each cell In Range("A1:B10")
      If cell.Interior.Color = RGB(255, 0, 0) Then ' Rote Füllfarbe
          cell.Interior.ColorIndex = xlNone
      End If
    Next cell

Diese Beispiele zeigen, wie du gezielt die Füllfarbe in Excel entfernen kannst.


Tipps für Profis

  • Nutze Selection.Clear, um sowohl Inhalt als auch Füllfarben in einem Schritt zu löschen. Dies entfernt jedoch auch andere Formatierungen.
  • Verwende xlNone für Interior.ColorIndex, um sicherzustellen, dass die Füllfarbe vollständig entfernt wird.
  • Wenn du häufig mit VBA arbeitest, halte deine zuletzt verwendeten Farben im Auge, um schnell auf sie zugreifen zu können.

FAQ: Häufige Fragen

1. Wie kann ich die Füllfarbe über die bedingte Formatierung löschen?
Wenn die Füllfarbe über eine bedingte Formatierung gesetzt wurde, musst du diese entfernen. Gehe zu „Start“ > „Bedingte Formatierung“ und wähle „Regeln verwalten“, um die entsprechenden Regeln zu löschen.

2. Was ist der Unterschied zwischen ClearContents und Clear?
ClearContents entfernt nur den Inhalt der Zellen, während Clear alle Inhalte, Formate und Füllfarben löscht.

3. Wie kann ich mehrere Zellbereiche auf einmal bearbeiten?
Du kannst mehrere Zellbereiche in einer einzigen Range-Anweisung kombinieren, z.B. Range("A1:B10, D1:E10").Interior.ColorIndex = xlNone.

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