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

Interior.Colorindex = 3 wird schwarz

Forumthread: Interior.Colorindex = 3 wird schwarz

Interior.Colorindex = 3 wird schwarz
30.09.2015 10:33:48
Albert
Guten Morgen zusammen,
in meinem Quellcode lasse ich Werte in Zellen eintragen.
In Abhängigkeit des Wertes wird die Zellfarbe geändert.
Mittels .Cells(rngZelle.Row, rngDatum.Column).Interior.Color = Farbe
lasse ich das Ganze abarbeiten.
"Farbe" hab ich als Double, String, Long und Integer zu deklarieren versucht, aber es funktioniert einfach nicht. Wenn ich die Zahl 6 nehme, wird die Zelle schwarz ausgefüllt.
Woran könnte das liegen?
Besten Dank für eure Hilfe
Gruß
A.

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Interior.Colorindex = 3 wird schwarz
30.09.2015 10:58:32
Nepumuk
Hallo,
die Color-Eigenschaft verlangt einen RGB-Wert. RGB(0, 0, 0) = 0 = schwarz je kleiner der Wert desto schwärzer. Das was du angibst ist der ColorIndex.
Gruß
Nepumuk

AW: Interior.Colorindex = 3 wird schwarz
30.09.2015 11:17:23
EtoPHG
Albert!
aber 

...Interior.Color = Farbe
ist was anderes, wie 


...Interior.ColorIndex = Farbe

...und Farbe sollte als Long definiert sein!
Gruess Hansueli

Anzeige
AW: Interior.Colorindex = 3 wird schwarz
30.09.2015 12:32:21
Albert
Mahlzeit Hansueli,
zu Colorindex hab ich gewechselt, dennoch wird mir die Zelle (mit der Zahl 5 (grün)) in der Tabelle als schwarz ausgefüllt.
Weshalb erkennt Excel die Zahl nicht richtig oder ist an was könnte das noch liegen, dass die falsche Farbe verwendet wird.
Gruß
A.

Anzeige
AW: Interior.Colorindex = 3 wird schwarz
30.09.2015 12:40:06
Rudi
Hallo,
das kann an einer angepassten Farbpalette (Stichwort Corporate Identity) liegen.
Deshalb arbeite ich nie mit Colorindex, sondern immer mit Color denn ein RGB-Wert ist überall gleich.
Gruß
Rudi

AW: Interior.Colorindex = 3 wird schwarz
30.09.2015 13:22:49
Daniel
Hi
Colorindex ist ein Überbleibsel von früheren Excelversionen, als Excel maximal 56 verschiedene Farben gleichzeitig darstellen konnte.
Damals wurde den Zahlen 1-56 ein RGB-Farbwert zugewiesen und man formatierte dann die Zelle über diese Zahl von 1-56.
heute braucht man den colorindex noch damit altmakros ohne Änderung weiter funktionieren und um die Formatierung auf "ohne Färbung" bzw den "Standardwert" setzen zu können.
Gruß Daniel

Anzeige
AW: Interior.Colorindex = 3 wird schwarz
30.09.2015 13:35:37
Albert
Danke Rudi, das war das richtige Stichwort.
Viele Grüße
A.

Forumthreads zu verwandten Themen

Was hat Interior.ColorIndex mit einem Rand zu tun?
Peter

Hallo
Bei der Bearbeitung eines Ranges verliert ein umrandeter Bereich innerhalb dieses Ranges bei nachfolgender Codezeile den unteren Rand.
Das verstehe ich nicht. Wer hilft mir auf die Sprünge? Ich will nur alle Farben (Hintergrund und Schrift) eliminieren.
Gruss, Peter
With A...
05.01.2010 14:18:02
Thread-ID: 1127323
6 Beiträge
Ist Summe bei Interior.ColorIndex = 37
Heinz

Hallo Leute
Habe in unteren Code wenn ich in Spalte A ein Datum eingebe,wird mir eine Spalte vorher die Spalte A bis G eingefärbt.
Nun möchte ich,wenn die Zelle eingefärbt wird, das in D die Summe bis zur oberen eingefärbten Spalte die Formel =Summe() eingefügt wird.
Die obere einge...
06.02.2011 10:44:43
Thread-ID: 1199245
10 Beiträge
Sortieren per VBA mit ColorIndex?
Moritz

Hallo,per VBA möchte ich die Spalten im Bereich A2:J650 sortieren lassen. Funktioniert auch, nur daß er die ColorIndex-Werte in Spalte F nicht als Zahlen liest, sondern stattdessen die "darunterliegende" Formel in die entsprechenden Zellen (F2:F650) einträgt. Gerade auf diese Zahlen kommt es je...
19.06.2003 08:37:27
Thread-ID: 271047
5 Beiträge
Interior. ColorIndex
Olli
Hallo Excel-Spezis;
ich moechte mit meinem Code gerne in Spalte C die Hintergrundfarben der Zelle auf die jeweilige Zelle in Spalte 7 uebertragen. Der Debugger motzt beim set b =...
Wie kann man den Debugger eigentlich beenden? Gibt es eine andere Moeglichkeit, als den Editor zu schliessen?<...
04.07.2003 11:39:08
Thread-ID: 277049
4 Beiträge
Nochmal Interior.ColorIndex
Olli
Hallo Forum,
jetzt habe ich folgendes vor. Ich moechte, wenn ich in Spalte 3 eine Zelle markiere, dann soll Excel fuer die Zeit des Markiertseins in der gleichen REihe, aber in Spalte 1 den Interior.ColorIndex auf Rot=3 setzten. Wenn keine Zelle in Sp. 3 mehr markiert ist, soll Excel den Interio...
04.07.2003 13:02:47
Thread-ID: 277114
4 Beiträge
Interior.colorindex funktioniert nicht
Robert
Hallo,
ich habe in einer Userform folgenden Code:


For Each zelle In Range("Platzname")
If Not DTPicker2.Value = "" Then
zelle.Interior.ColorIndex = vbRed
Else
zelle.Interior.ColorIndex = vbGreen
End If
Next zelle<...
30.10.2003 12:40:50
Thread-ID: 331017
3 Beiträge
interior.colorindex entsprechend BackColor
Peter
Wer kann helfen?
Hat jemand eine Übersicht welche Farben des interior.colorindex
den Palettenfarbe für Backcolor entsprechen?
Ich kenne nur diese Formulierungsweise, und es ist sehr mühsam
die Backcolorfarbe den interior.colorindex anzupassen.

z.B. Range("A1").interior.colorind...
13.01.2004 19:50:05
Thread-ID: 363283
5 Beiträge
Anzeige
Aus Interior.colorindex den hexadezimalwert finde
Bernd

Hallo,
ich noch mal!
Ich habe in der Spalte A verschiedenste farbige Zellen, und bräuchte ein Makro, was immer in die Spalte daneben den Hexadezimal wert schreibt. Also wenn die Zelle weiß ist dann #FFFFFF wenn sie schwarz wäre #000000 usw.
wie geht das?
17.06.2004 09:01:54
Thread-ID: 442363
3 Beiträge
Interior Colorindex mit Bedingter formatierung?
Slashmaster

Hallo und schönen Nachmittag,
ist es möglich, egal ob die Hintergrundfarbe eingestellt wurde, oder per bedingter Formatierung erscheint, den Colorindex herauszufinden?
Gruß
Markus
17.06.2004 17:24:24
Thread-ID: 442672
10 Beiträge
Interior Color Index
Heinz

Liebe Excel-User,
ich habe mir in Excel eine Datei aufgebaut,
in der ich in den Zellen bestimmte Farben
verwende und zählen lasse.
In etwa so:
I = 0
For Each Cell In Range("CA1:EQ220")
If Cell.Interior.ColorIndex = Aktion Then I = I + 1
Next Cell
'Aktion ist die...
05.07.2004 13:03:58
Thread-ID: 450275
3 Beiträge
Anzeige
BackColor - Interior.ColorIndex
Peter

Hallo,
Hab da noch ne' Frage zur opt. Gestaltung:
Die Hintergrundfarbe in der Tabelle wird mit
interior.coloindex bestimmt,
die Hintergrundfarbe von Schaltflächen mit
Backcolor.
Jetzt hab ich 3 Möglichkeiten zur Farbangabe
gefunden.
' Private Sub TgbEIN_Click()...
06.01.2005 12:07:55
Thread-ID: 542672
3 Beiträge
interior colorindex
Hartmut_M

Hallo, in einer Urlaubsliste habe ich Zellen in zwei verschiedenen Farben und die weißen Zellen. Ich möchte nun einen Bereich mit Range auswählen, z. B. B2:R12. Nun sollen alle Zellen die nicht blau oder gelb sind rot eingefärbt werden. Habe dies mit folgendem Code versucht:
Range("b2:r12")...
19.01.2005 17:35:59
Thread-ID: 550609
3 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Interior.Colorindex in Excel: Häufige Probleme und Lösungen

Schritt-für-Schritt-Anleitung

  1. Zelle auswählen: Bestimme die Zelle, deren Hintergrundfarbe du ändern möchtest. Zum Beispiel:

    Dim rngZelle As Range
Set rngZelle = ThisWorkbook.Sheets("Tabelle1").Cells(1, 1) ' Zelle A1

  2. Farbe festlegen: Verwende die Interior.ColorIndex-Eigenschaft, um die Farbe zu setzen. Beispielsweise:

    rngZelle.Interior.ColorIndex = 3 ' Rot

  3. Testen: Führe den Code aus und überprüfe, ob die Zelle die erwartete Farbe anzeigt.

  4. Fehlerbehebung: Wenn die Zelle schwarz erscheint, prüfe, ob die verwendete Farbe mit dem ColorIndex-Wert übereinstimmt.

Häufige Fehler und Lösungen

  • Zelle wird schwarz: Wenn Interior.ColorIndex = 3 schwarz anzeigt, liegt das häufig daran, dass Excel eine andere Farbpalette verwendet. Stelle sicher, dass du die Standardpalette verwendest oder wechsle zu Interior.Color, um RGB-Werte zu verwenden.

  • Falsche Farbzuweisung: Achte darauf, dass der Farbe-Wert als Long deklariert ist. Eine falsche Typdeklaration kann zu unerwarteten Ergebnissen führen:

    Dim Farbe As Long
Farbe = 5 ' Grün
rngZelle.Interior.ColorIndex = Farbe

Alternative Methoden

  • Verwendung von RGB: Anstatt ColorIndex zu verwenden, kannst du RGB-Werte direkt angeben:

    rngZelle.Interior.Color = RGB(255, 0, 0) ' Rot

  • Verwendung von DisplayFormat: Um die tatsächliche Farbe zu erhalten, die auf die Zelle angewendet wird, kannst du DisplayFormat.Interior.ColorIndex verwenden:

    MsgBox rngZelle.DisplayFormat.Interior.ColorIndex

Praktische Beispiele

  • Beispiel 1: Ändern der Hintergrundfarbe basierend auf dem Wert in einer Zelle:

    If rngZelle.Value > 10 Then
   rngZelle.Interior.ColorIndex = 4 ' Grün
Else
   rngZelle.Interior.ColorIndex = 3 ' Rot
End If

  • Beispiel 2: Löschen der Hintergrundfarbe:

    rngZelle.Interior.ColorIndex = xlNone ' Keine Farbe

Tipps für Profis

  • Vermeide die Verwendung von ColorIndex, wenn du sicherstellen möchtest, dass deine Farben konsistent sind, da der ColorIndex je nach Excel-Version und benutzerdefinierter Palette variieren kann.

  • Nutze immer Interior.Color für präzise Farbanpassungen, besonders wenn du mit benutzerdefinierten Farbpaletten arbeitest.

  • Überprüfe vor der Anwendung von Farben, ob die Zelle möglicherweise bereits eine Formatierung hat, die die neue Farbe überschreibt.

FAQ: Häufige Fragen

1. Warum wird die Zelle schwarz, wenn ich ColorIndex = 3 verwende?
Das kann an einer angepassten Farbpalette liegen. Verwende stattdessen Interior.Color, um sicherzustellen, dass die richtige Farbe angezeigt wird.

2. Wie kann ich die Hintergrundfarbe einer Zelle zurücksetzen?
Du kannst die Hintergrundfarbe zurücksetzen, indem du Interior.ColorIndex = xlNone verwendest, um die Zelle ohne Färbung zu lassen.

Beliebteste Forumthreads (12 Monate)

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