XL 2016 Copier/coller une couleur de cellule (macro)

[HelloDy]

Bonjour à tous,

J'ai une cellule, par exemple A1 coloriée en vert.
J'aimerais écrire une macro pour copier uniquement la couleur de la cellule A1 et coller cette couleur sur une plage, par exemple [A5:B6].

Merci beaucoup 🙂


Elo

 

[Robert]

Bonjour Elo, bonjour le forum,

Excel 2013 :
Range("A5:B6").Interior.ColorIndex = Range("A1").Interior.ColorIndex

Après, c'est plus complexe mais le principe reste le même...

 

[HelloDy]

Bonjour @Robert

Merci. Je m'aperçois que j'aurais dû préciser que la cellule "source" et la plage "destination" sont sur deux onglets différents...
Je ne pensais pas que ça aurait une incidence mais là je me retrouve bloquée du coup ! 😕

Une solution pour coller sur un autre onglet ?

Merci d'avance beaucoup beaucoup ! 😛


Elo

 

[HelloDy]

Re !

Ah ben dis donc j'ai réussi à trouver toute seule, qui l'eût cru ?!

Sheets("Onglet Destination").Range("A5:B6").Interior.ColorIndex = Sheets("Onglet Source").Range("A1").Interior.ColorIndex

Merci encore @Robert 🙂


Elo