Couleur de cellule

Résolu

Medestrac -
Medestrac - 21 févr. 2019 à 15:53

Bonjour,

J'essaye de faire une macro qui inverse la couleur de remplissage de 2 cellules Excel
J'ai quelque chose du genre

c1=range("A1").interior.colorindex
t1=range("A1").interior.TintAndShade
range("A1").interior.colorindex = range("A2").interior.colorindex
range("A1").interior.TintAndShade = range("A2").interior.TintAndShade
range("A2").interior.colorindex=c1
range("A2").interior.TintAndShade=t1

Mais malgré ça les couleurs changent quand même. Si je lance une deuxième fois le code les couleurs ne bougent plus, j'en déduis que j'ai oublié de copier une propriété...mais laquelle?

A voir également:

Couleur de cellule
Excel cellule couleur si condition texte - Guide
Excel compter cellule couleur sans vba - Guide
Boite a couleur - Télécharger - Divers Photo & Graphisme
Proteger cellule excel - Guide
Excel si cellule contient partie texte ✓ - Forum Excel

2 réponses

Réponse 1 / 2

ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention 2 433

Bonjour

ton code fonctionne correctement
https://www.cjoint.com/c/IBvoWbeBWOB

Cdlmnt

Réponse 2 / 2

Medestrac

Merci du coup de main, mais ça ne fonctionne toujours pas. Je pense que ça vient de la notion de ThemeColor introduit par Excel depuis ta version.

J'ai remplacé ColorIndex par Color et j'ai l'impression que ça résout mon problème. Je vais le passer en résolu.

Discussions similaires

sertissage des cables rj45

Colorer une cellule quand une autre est non vide

Si couleur, alors...

Couleur transparente

Transparence en tete et bas de page

Votre réponse

Discussions similaires