VBA plusieur cellule dans une de façon conditionnel

Résolu/Fermé

slab62100 - Modifié par slab62100 le 10/02/2016 à 17:50
via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 - 11 févr. 2016 à 00:59

Bonjour,

Tout d'abord je souhaite remercier chaleureusement toute personne qui prendra le temps de m'aider dans mon premier projet VBA
Je vous explique ce que je cherche à faire

J55 = Bleu K55= OUI
J56 = Rouge K56= OUI
J57 = Jaune K57= NON
J58 = Vert K58 = OUI
J59 = Noir K59 = NON

Je voudrais mettre les couleur ou je dispose de l'info OUI dans la case B47 sous la forme "Bleu; Rouge; Vert" (l'ordre importe peu)
Et celle avec l'info NON dans la case B48 sous la forme "Jaune; Noir" (l'ordre importe peu)

La valeur K55:K59 est déterminé à l'aide de case à coché dans une interface graphique VBA
Je souhaiterais donc que les information passe de la cellule B47 à B48 en fonction de la valeur oui ou non

A voir également:

VBA plusieur cellule dans une de façon conditionnel
Aller à la ligne dans une cellule excel - Guide
Excel compter cellule couleur sans vba - Guide
Verrouiller cellule excel - Guide
Excel cellule couleur si condition texte - Guide
Incompatibilité de type vba ✓ - Forum Programmation

1 réponse

Réponse 1 / 1

via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 2 702
11 févr. 2016 à 00:59

Bonsoir

Utilises une macro de ce genre :

Sub dispatcher ()
bon=""
mauvais=""
For x=55 to 59
if range("K" & x)="OUI" then bon=bon & range("J" & x)  & ";  " else mauvais=mauvais & range("J" & x)  & ";  "
next x
range("B47")=bon
range("B48")=mauvais
end sub

Celmnt
Via

Discussions similaires

Excel VBA : Récupérer la valeur d'une cellule

Excel si cellule contient texte alors...

Excel : colorer une cellule sous condition d'une autre ?

"L'indice n'appartient à la sélection" + VBA

Formule Excel : "SI" une cellule contient un mot, alors ?

Discussions similaires

Newsletters