XL 2010 Table Structurée - Couleur style

vgendron · 3 Mars 2023

Hello

Sauriez vous me dire s'il est possible (et comment) de recupérer la couleur d'un style de table structurée
dans l'exemple ci joint, j'ai créé une table (t_Vierge) avec le style "Bleu style de tableau moyen 2"
j'aimerai pouvoir récupérer l'indice couleur de la ligne d'entete. afin de le réutiliser sur des cellules "Hors table"
dans l'exemple: colorer A7:B7 comme A17:B17

si je fais range("A8").interior.color: il ne voit pas de couleur...

il y a surement un moyen d'aller voir les propriétés d'un style prédéfini....

TooFatBoy · 4 Mars 2023

Range("A8").DisplayFormat.Interior.Color peut-être ???

Désolé, je ne peux pas tester actuellement.

TooFatBoy · 4 Mars 2023

Bonjour,

Est-ce qu'il n'y a pas une histoire de DISPLAY ?

vgendron · 4 Mars 2023

Hello @TooFatBoy

Display?

je ne connais pas ca... qu'entends tu par ca?

TooFatBoy · 4 Mars 2023

Range("A8").DisplayFormat.Interior.Color peut-être ???

Désolé, je ne peux pas tester actuellement.

vgendron · 4 Mars 2023

TooFatBoy à dit:
DisplayFormat.Interior.Color peut-être ???

Désolé, je ne peux pas tester actuellement.

Exactement ca !!
Merci
bon bah. je vais pouvoir me coucher serein

TooFatBoy · 4 Mars 2023

Content pour toi si ton problème est résolu, camarade.

Bonne nuit

Dranreb · 4 Mars 2023

Bonsoir.
Il est quand même possible de récupérer ces infos de la propriété TableStyle du ListObject.
Partez en liaisons anticipées sinon c'est imbitable.

Retrouvé ça :

[RESOLU] Obtenir code couleur RGB ou Hexadecimal

Bonjour,:) J'ai mis en forme une plage de données en un tableau structuré excel. J'ai voulu utiliser la couleur de ce tableau sur une autre feuille sans utiliser le copier coller la mise en forme, mais plutôt par un code couleur. La fonction ci-dessous me donne le code de la couleur de l'une...

excel-downloads.com

vgendron · 4 Mars 2023

Hello @Dranreb

merci, effectivement, c'est plus "long" quie de passer par le display, mais sans doute plus "précis"
par liaison anticipée. tu entends "faire un set = ....tablestyle?

j'ai remarqué justement que la saisie semi automatique atteint un niveau qui dépend de la déclaration

si je fais juste

Dim t As ListObject
Set t = ActiveSheet.ListObjects("t_vierge")

==>la saisie semi auto propose bien .tablestyle mais plus rien après

alors que si je déclare

Dim Tse As TableStyle
Set Tse = ActiveSheet.ListObjects("t_Vierge").TableStyle

==>la saisie semi propose jusqu'au niveau interior.color

étonnant..

XL 2010 Table Structurée - Couleur style

vgendron

XLDnaute Barbatruc

Pièces jointes

TooFatBoy

TooFatBoy

XLDnaute Barbatruc

vgendron

XLDnaute Barbatruc

TooFatBoy

XLDnaute Barbatruc

vgendron

XLDnaute Barbatruc

TooFatBoy

XLDnaute Barbatruc

Dranreb

XLDnaute Barbatruc

[RESOLU] Obtenir code couleur RGB ou Hexadecimal

vgendron

XLDnaute Barbatruc

Discussions similaires