Copier la couleur d'une cellule

Bonjour à tous

Est il possible de récupérer la couleur de la cellule J3 dans (FeuilleDeTravail) Afin de mettre à jour la feuille (Salle de conférence)dans le planning lorsque je clique sur le bouton (recherche automatique) et que je récupère le nom de l'utilisateur.

J'espère être assez clair

Merci pour votre aide

15un-des-chemins.xlsm (11.47 Ko)

Bonsoir,

bout de code à placer suivant besoin

Dim C
C = Range("FeuilleDeTravail!j3").Interior.ColorIndex
ActiveCell.Interior.ColorIndex = C

Amicalement

Claude

choix

Bonjour Claude et merci de ton aide.

J'ai essayé en vain de suivre tes instructions en placant ce bout de code dans le userform de réservation.

A partir de la ligne 150 jusqu'à la ligne 194 en remplacement du (=35) qui conditionne la couleur.

Mais je n'y arrive pas, peux tu m'aider, à moins qu'il faille utiliser une autre méthode

Merci encore

Bonjour,

Envoie un fichier allégé, pas besoin de toutes ces feuilles pour régler le problème

en mettant des annotations de ce que tu veux obtenir

Claude

comme demandé

amicalement

253copie-de-pat.zip (112.14 Ko)

re,

Désolé Pat, je ne suis pas suffisamment expérimenté en UserForm pour pouvoir

t'aider sur ce coup là.

autant le dire, je passe la main

Amicalement

Claude

Il ne faut pas être désolé et je te remercie quand même pour ton aide

bonne continuation et à une autre fois

résolu

merci à tous

Rechercher des sujets similaires à "copier couleur"