Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2172 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  macro pour 4 conditions

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

macro pour 4 conditions

n°1823719
clem753
Posté le 08-12-2008 à 19:46:04  profilanswer
 

Bonjour,
 
Tout d'abord je ne connais quasiment pas le vba, d'ou le besoin de votre aide de spécialiste, pour traiter un fichier au boulot.
 
Voici mon besoin :  
 
4 couleurs de lignes differentes selon la valeur d'une des colonnes du tableau
 
Si Colonne Taille >= 1000 alors colorier la ligne du tableau en rouge
Si Colonne Taille >= 500 alors colorier la ligne du tableau en bleu
Si Colonne Taille >= 300 alors colorier la ligne du tableau en jaune
Si Colonne Taille >= 200 alors colorier la ligne du tableau en rouge
Si Colonne Taille = 0 alors laisser la ligne du tableau non colorié
 
Ca marche avec les mises en forme conditionnelles mais je suis limité a 3 conditions et donc 4 couleurs (avec le blanc) et ca donne ca :
 
http://img126.imageshack.us/img126/2412/screenshot004op9.jpg
http://img126.imageshack.us/img126/screenshot004op9.jpg/1/w486.png
 
Je precise qu'il faut que la ligne du tableau soit coloriée et pas seulement la cellule
 
Pourriez vous m'aider la dessus ?  
 
Merci.

mood
Publicité
Posté le 08-12-2008 à 19:46:04  profilanswer
 

n°1823972
86vomito33
Posté le 09-12-2008 à 09:39:21  profilanswer
 

bonjour,
 
faudrait faire un truc du genre:
for i=6 to 60 step 1
taille=cells(i,2)
select case taille
case >=1000
Range(cells(i,1),cells(i,5)).Interior.ColorIndex = 3 (jaune)
case >=500
Range(cells(i,1),cells(i,5)).Interior.ColorIndex = 5
case >=300
Range(cells(i,1),cells(i,5)).Interior.ColorIndex = 6
case >=200
Range(cells(i,1),cells(i,5)).Interior.ColorIndex = 46
end select
next i

n°1824194
SuppotDeSa​Tante
Aka dje69r
Posté le 09-12-2008 à 14:36:45  profilanswer
 

clem753 a écrit :


4 couleurs de lignes differentes selon la valeur d'une des colonnes du tableau
 
Si Colonne Taille >= 1000 alors colorier la ligne du tableau en rouge
Si Colonne Taille >= 500 alors colorier la ligne du tableau en bleu
Si Colonne Taille >= 300 alors colorier la ligne du tableau en jaune
Si Colonne Taille >= 200 alors colorier la ligne du tableau en rouge
Si Colonne Taille = 0 alors laisser la ligne du tableau non colorié
 


 
On doit pouvoir s'en sortir avec 3 conditions je pense vu que tu as deux fois la couleur rouge (meme pour moi il manque une borne : entre 0 et 200 il y a quoi ?), sans avoir recours au macro. Le sens dans lequel tu mets tes conditions a son importance.
 
Je m'explique :
 
1ere MEF conditionnelle : La valeur de la cellule est Comprise entre 500 et 1000 ---)> Bleu
2nde MEF conditionnelle : La valeur de la cellule est Comprise entre 300 et 500 ---)> Jaune
3eme MEF conditionnelle : La valeur de la cellule est Comprise entre 1 et 9999999999999999 ---)> Rouge
 
On se retrouve avec ce tableau :   (J'ai pris des nombres au hasard pour tester)
450 - Jaune
250 - Rouge
350 - Jaune
1500 - Rouge
650 - Bleu
780 - Bleu
0 - Rien ou blanc
670 - Bleu
289 - Rouge
"vide" - Rien ou blanc
300 - Jaune
299 - Rouge
 
 
Cordialement


Message édité par SuppotDeSaTante le 09-12-2008 à 14:38:36

---------------
Soyez malin, louez entre voisins !

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  macro pour 4 conditions

 

Sujets relatifs
Récupérer la saisie sur userform dans la macromacro word qui divise 1 fichier en plusieurs fichiers
Chercher répertoire en VBA Macro Excelfermer navigateur depuis macro excel
1ere MacroExcel macro filtre sur onglet
Macro excel called from Matlab?Macro sous Word insertion photos
Macro Excel: recherche dans des objets OLEprobleme macro excel
Plus de sujets relatifs à : macro pour 4 conditions


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR