Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
404to408
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
404to408
404to408
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

@Ramses

@Ramses
30.03.2004 23:19:55
Karl-Otto Reimann
Guten Abend Rainer,
Du kennst Dich doch bei Farben bestens aus.
Haben Zellen und Steuerelemente bei gleichen RGB-Werten unterschiedliche Farben?
Siehe "30.03.2004 22:56:06"
Einen schönen Abend wünscht
Karl-Otto

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
  • 30.03.2004 23:25:23
    Ramses
  • 30.03.2004 23:43:18
    Josef Ehrensberger
  • 30.03.2004 23:50:23
    Karl-Otto Reimann
Anzeige
AW: @Ramses
30.03.2004 23:25:23
Ramses
Hallo Karl-Otto
Ja, das kann sein.
Zellen unterstüzen keine RGB-Adressierung, Steuerelemente dagegen schon.
Die Zellen "greifen" sich den nächsten Farbindex der in der Farbpalette zur Verfügung steht, während Steuerelemente die RGB-Farben unterstützen.
Das glaube ich zumindest zu wissen :-)
Bei MS bin ich mir da immer nicht ganz sicher, wenn ich die Anzahl der zur Verfügung stehenden Lösungen betrachte die hier immer wieder angeboten werden, für Sachen die in EXCEL "unmöglich" sind ;-)
Gruss Rainer
Tip!
30.03.2004 23:43:18
Josef Ehrensberger
Hallo Karl-Otto!
Ein kleiner Tip!
Wenn du in deiner Datei spezielle Farben benötigst,
kannst du die farbzuweisungen bearbeiten.
Entweder über > Extras > Optionen > Farben > Ändern,
oder mittels Makro.
Z.B. so:


Option Explicit
Sub NeueFarbe()
'Colorindex (1-56) einen RGB-Wert zuweisen
ThisWorkbook.Colors(15) = RGB(255, 85, 25)
ThisWorkbook.Colors(16) = RGB(85, 185, 125)
End Sub
Sub StandardFarbe()
'Standartfarben zurücksetzen
ThisWorkbook.ResetColors
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5


Gruß Sepp


Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.

(Sir Winston Churchill)


Anzeige
AW: Tip!
30.03.2004 23:50:23
Karl-Otto Reimann
Hallo Sepp
Das ist klar, mach ich so z.B.:

Private Sub Workbook_Open()
With ActiveWorkbook
.Colors(9) = RGB(204, 51, 0)
.Colors(10) = RGB(0, 102, 102)
.Colors(17) = RGB(223, 223, 223)
.Colors(18) = RGB(219, 219, 219)
.Colors(23) = RGB(0, 0, 0)
.Colors(51) = RGB(51, 102, 153)
.Colors(49) = RGB(0, 76, 118)
.Colors(42) = RGB(116, 200, 182)
.Colors(22) = RGB(222, 158, 158)
End Sub

Gruß
Karl-Otto

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige