Registerfarbennummer auslesen

Forumthread: Registerfarbennummer auslesen
5 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Registerfarbennummer auslesen

06.08.2015 13:45:48

Hans

Hallo Zusammen,
wie kann ich den die Registerfarbennummer meines aktuellen Tabellenblattes auslesen?
Excel 2013.
Danke schon mal...
Hans

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

farbe = Sheets("Tabelle1").Tab.ColorIndex Gruß(oT)

06.08.2015 13:54:14

AlexG
AW: farbe = Sheets("Tabelle1").Tab.ColorIndex Gruß(oT)

06.08.2015 14:00:16

Hans
AW: farbe = Sheets("Tabelle1").Tab.ColorIndex Gruß(oT)

06.08.2015 14:08:34

AlexG
AW: farbe = Sheets("Tabelle1").Tab.ColorIndex Gruß(oT)

07.08.2015 12:30:02

Hans
Bitte, gern geschehen Gruß Alex (owT)

07.08.2015 13:23:19

AlexG

farbe = Sheets("Tabelle1").Tab.ColorIndex Gruß(oT)

06.08.2015 13:54:14

AlexG

AW: farbe = Sheets("Tabelle1").Tab.ColorIndex Gruß(oT)

06.08.2015 14:00:16

Hans

nicht ganz das was ich suche.
ich habe dem tabellenblatt vorher folgende farbe zugewiesen:
With ActiveWorkbook.ActiveSheet.Tab
.Color = 5296274
End With
Mit
farbe = Sheets("Tabelle1").Tab.ColorIndex
bekomme ich aber "6" raus.
wie kann das sein?
Grüße

AW: farbe = Sheets("Tabelle1").Tab.ColorIndex Gruß(oT)

06.08.2015 14:08:34

AlexG

Hallo Hans,
wenn du die Farbe mit .Color vergibst musst du sie auch mit .Color auslesen
farbe = Sheets("Tabelle1").Tab.Color
Gruß
Alex

AW: farbe = Sheets("Tabelle1").Tab.ColorIndex Gruß(oT)

07.08.2015 12:30:02

Hans

Prima - Danke.
Grüße
Hans

Bitte, gern geschehen Gruß Alex (owT)

07.08.2015 13:23:19

AlexG