Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1404to1408
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
Inhaltsverzeichnis

Blattseitenfarbe formatieren

Blattseitenfarbe formatieren
28.01.2015 23:17:16
Jonas
Hallo Forum,
Ziel ist es die Blattreiter Farbig zu formatieren. Da diese alphanumerisch aufsteigen, möchte ich dafür einen Integer benutzen (Int_1).
Im folgenden Quellcode bekomme ich beim Ausführen der Zeile ".ThemeColor = 255"
den Laufzeitfehler "9"
Meine Vermutung geht dahin das er Probleme mit der Zeile darüber hat.
Ein Konflikt mit dem Integer, wobei eine Selektierung ohne Probleme funktioniert.
  • 
    Sub Blattformat()
    Dim Int_1 As Integer
    Dim Zero As Integer
    Sheets(Sheets.Count).Select
    Int_1 = ActiveSheet.Name
    MsgBox Int_1
    '    Sheets(Int_1).Select
    With ActiveWorkbook.Sheets(Int_1).Tab
    .ThemeColor = 255
    .TintAndShade = 0
    End With
    '   Rot     =   255
    '   Grün    =   5287936
    '   Lila    =   10498160
    End Sub
    


  • Danke im voraus.
    Gruß
    Jonas

    1
    Beitrag zum Forumthread
    Beitrag zu diesem Forumthread

    Betreff
    Datum
    Anwender
    Anzeige
    AW: Blattseitenfarbe formatieren
    29.01.2015 00:42:38
    Raphael
    Hallo Jonas,
    dein Problem hat nichts mit dem darüber zu tun.
    Versuchs einfach mal mit .Color statt .ThemeColor
    Gruess
    Raphael
    Anzeige

    Beliebteste Forumthreads (12 Monate)

    Anzeige

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Anzeige
    Anzeige