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

Forumthread: Registerblätter automatisch färben

Registerblätter automatisch färben
26.05.2015 08:00:16
Fabian
Hallo zusammen,
gibt es eine Möglichkeit, dass jedem bestehenden und später hinzugefügten Arbeitsblatt eine eigene Farbe zugewiesen wird?
Das ganze sollte automatisch ablaufen.
Gruß
Fabian

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Registerblätter automatisch färben
26.05.2015 08:19:53
Hajo_Zi
Hallo Fabian,
es ging ja um neue.
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, Doppelklick auf Deine Datei, Doppelklick auf DieseArbeitsmappe, Code ins rechte Fenster kopieren, VBA Editor schließen.
Das Makro wird automatisch gestartet.
Der Code wirkt in der gesamten Datei.
Option Explicit
Private Sub Workbook_NewSheet(ByVal Sh As Object)
ActiveSheet.Tab.Color = Worksheets.Count + Worksheets.Count * 50
End Sub

Anzeige
AW: Registerblätter automatisch färben
26.05.2015 09:19:59
Fabian
Hallo Hajo,
vielen Dank für deine Hilfe. Funktioniert einwandfrei.
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige