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

Blauer Farbverlauf

Forumthread: Blauer Farbverlauf

Blauer Farbverlauf
01.12.2004 17:11:58
Jochen
Hallo Leute,
hätte gern einen Farbverlauf von dunkelblau zu hellblau. Von Hand kann ich ja eigene Farben definieren aber das ist mühsam und dauert.
Da gibts doch bestimmt ein Makro, dass das automatisch erledigt?
Meine kenntnisse reichen da leider nicht.
Grüße Jochen
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Blauer Farbverlauf
K.Rola
Hallo,
Option Explicit
Sub Farben()
Dim x As Integer, B As Integer, G As Integer
B = 90
G = 0
Application.ScreenUpdating = False
For x = 1 To 56
ThisWorkbook.Colors(x) = RGB(0, G, B)
B = B + 3
G = G + 4
Cells(x, 1).Interior.ColorIndex = x
Next
Application.ScreenUpdating = True
End Sub

Gruß K.Rola
Anzeige
Klasse, danke oT
Jochen
oT
;

Beliebteste Forumthreads (12 Monate)

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