Discussion :

[Benjycool]

Bonjour,

Je voudrais grâce à une macro inserer une valeur et mettre la même couleur que la cellule d'un autre classeur.

Je m'explique, j'ai une case marquer "coucou" en bleu.
Je voudrais dans un autre classeur marquer "bonjour" mais en bleu comme dans le premier classeur.
Si le "coucou" est rose le "bonjour" devra etre rose ...

comment faire ?

Merci de bien vouloir m'aider.
Benjycool

[ouskel'n'or]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    Range("F4").Copy 'copie de la cellule bleue ou rose
    Range("H4").PasteSpecial Paste:=xlPasteFormats 'collage du seul format

[Benjycool]

Ce n'est pas ce que je demande, j'ai du mal m'exprimer.

Je souhaiterai avoir le code couleur.

Par exemple si coucou est en bleu et que je fais un Msgbox (couleur) il me sort 6 (on va dire que le code de couleur pour le bleu est 6).

Ce qu'il me faut sait
couleur = syntaxe pour avoir la couleur des caracteres
dans la cellule

Je pense etre clair, sinon dite moi le.

Merci de m'aider
Benjycool

[ouskel'n'or]

Et comme ça, ça te va ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Couleur = Range("F4").Font.ColorIndex

Je n'ai rien fait de plus qu'enregistrer une macro en faisant pour être sûr du code

[Benjycool]

Ok c'est nikel comme ça je te remercie.

Benjycool