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

Beiträge aus den Excel-Beispielen zum Thema "Tabellenreiter farbig von Tina"