• Initiateur de la discussion Initiateur de la discussion ebe
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Re : couleur

Bonsoir eBe,
Voici le code :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
If Target.Column <> 2 Then Exit Sub
Set c = Sheets("Données").Range("Liste").Find(Target)
If Not c Is Nothing Then
Target.Interior.ColorIndex = c.Interior.ColorIndex
End If

End Sub
---------------------------
Avec "Donnée" le nom de ta feuille où se situe tes données
Avec "Liste" le nom de ta liste

Amicalement
feutrine
 
Re : couleur

bonsoir feutrine
j ai essayer de faire comme tu a dis mais je n et pas tres bien compris car debutant c dur je ny suis pas arriver
c le code apres il faut le placer ou je te joint la feuillle
je te remercie encore de m aider
mes salutation du soir ebe
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Réponses
32
Affichages
766
Retour