Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Affecter un mot à une cellule si

Philippepilou

XLDnaute Nouveau
Bonjour à tous,
grand débutant en VBA, je me pose la question suivante:
Comment affecter un mot "Bleu" dans une cellule si une autre cellule de la même ligne contient le mot "Bois"? Et ce pour tout une colonne.

La maigre petite chose que j'ai produit...

Sub Affectermot()
Dim cellule As Range
Dim mot As Range
For Each cellule In Range([E7], [E7].End(xlDown))
If cellule.Value = "Bois" Then
' .... Alors affecter Bleu" dans la cellule de la même ligne de la colonne "C"
End If
Next
End Sub


Je vous remercie d'avance pour vos réponses.
 

Pièces jointes

  • Maison TEST.xls
    19 KB · Affichages: 35
  • Maison TEST.xls
    19 KB · Affichages: 37
  • Maison TEST.xls
    19 KB · Affichages: 38

bbb38

XLDnaute Accro
Re : Affecter un mot à une cellule si

Bonjour Philippepilou, le forum,
Une solution par boucle.
Cordialement,
Bernard
 

Pièces jointes

  • Maison TEST.xls
    64 KB · Affichages: 36
  • Maison TEST.xls
    64 KB · Affichages: 41
  • Maison TEST.xls
    64 KB · Affichages: 41

Regueiro

XLDnaute Impliqué
Re : Affecter un mot à une cellule si

Bonsoir.
Avec une procédure événementielle.
Voir en PJ.
A+
 

Pièces jointes

  • Maison TEST.xlsm
    13.9 KB · Affichages: 40

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…