Codes et couleurs

Bonjour,

j'essaie de colorer les cellules des feuilles de mon classeur, et à force de recopier les codes de certaines macros, je m'aperçois que pas mal de caractéristiques de couleur ressemblent à ça (j'ai viré le reste..):

            With .Interior
                .ThemeColor = xlThemeColorLight1
                .TintAndShade = 0.5
                .ColorIndex = 35
            End With

N'y a t il pas un problème ? Car la dernière ligne

            With .Interior
                [barrer].ThemeColor = xlThemeColorLight1[/barrer]
                [barrer].TintAndShade = 0.5[/barrer]
                .ColorIndex = 35
            End With

annule totalement l'effet des deux premières.

Alors deux questions:

1/ Est ce normal de panacher ces deux méthodes ?

Si OUI, y a t il une méthode à respecter ?

Si NON, y a t il danger? Y en a t il une "meilleure" que l'autre ?

2/ J'ai trouvé sur le net des exemples de code avec .ThemeColor

Mais je n'arrive pas avec cette caractéristique à retrouver la couleur obtenue par .ColorIndex

Et je ne trouve pas la liste des valeurs qu'on pouvait lui attribuer (expl: xlThemeColorLight1)

Est ce défini quelque part ?

Enfin... Je patauge... J'arrive en gros à ce que je veux, mais c'est un peu brouillon..

merci

Salut, habitue toi à utiliser les couleurs RGB

Range("A1").interior.color = RGB(100,100,100)

Pour les palettes RGB tu en as partout.

Bonjour, BastLat, EnguéEngué

Un fichier avec les codes RVB

Amicalement

Pierrot

Re,

Merci pour vos suggestions.

Effectivement, j'ai aussi joué avec RGB

Mais si vous le savez... Pouvez m'éclairer sur mes questions du 1e post ?

Bonjour,

je ne sais pas très bien ce que vous voulez au point 1

A tout hasard, je vous poste un fichier exemple,

Cordialement

Pierrot

Cappe Pierre a écrit :

Bonjour,

je ne sais pas très bien ce que vous voulez au point 1

A tout hasard, je vous poste un fichier exemple,

Cordialement

Pierrot

Finalement, je pense que je me prends un peu trop la tête

Je vais adopter RGB, et faire le ménage dans mon code.

Merci pour vos réponses.

Cappe Pierre a écrit :

Bonjour,

je ne sais pas très bien ce que vous voulez au point 1

A tout hasard, je vous poste un fichier exemple,

Cordialement

Pierrot

Bonjour Pierre

Savez vous sil est possible de faire la même chose avec du texte ?

Si oui quelle ligne de code doit on utiliser ? je suis novice en VBA et je suis un peu perdu

Merci