Herbers Excel-Forum - das Archiv

Tabellenreiter farbig von Tina

Bild

Betrifft: Tabellenreiter farbig von Tina
von: Jürgen

Geschrieben am: 09.04.2005 21:29:41
Hallo ich habe von Tina das VBA ausprobiert und es kommt eine Fehlermeldung.
Private Sub Workbook_Open()
Dim wks As Worksheet
Dim m As Variant
m = Month(Now)
For Each wks In Worksheets
If wks.name = m Then
wks.Tab.ColorIndex = 3
Else
wks.Tab.ColorIndex = 36
End If
Next
End Sub

Hier muß bestimmt der Name der Arbeitsmappe rein?
MfG Jürgen
Bild

Betrifft: AW: Tabellenreiter farbig von Tina
von: Hajo_Zi

Geschrieben am: 09.04.2005 21:32:26
Hallo Jürgen,
mir scheint Du hast nicht den gesamten Beitrag gelesen. Erst ab Version XP.

Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


Bild

Betrifft: AW: Tabellenreiter farbig von Tina
von: Jürgen
Geschrieben am: 09.04.2005 21:39:43
ja okay ich habe aber nur das Office 2000. Da gibt es keine Lösung?
MfG Jürgen
Bild

Betrifft: AW: Tabellenreiter farbig von Tina
von: Hajo_Zi

Geschrieben am: 09.04.2005 21:40:44
Hallo Jürgen,
das siehst Du Richtig.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.
 Bild
Excel-Beispiele zum Thema "Tabellenreiter farbig von Tina"
Nur nichtfarbige Zellen schützen Label und Zellen farbig markieren