Remplir une ligne en rouge en fonction d'une condition

jiffey Messages postés 1 Date d'inscription jeudi 14 février 2008 Statut Membre Dernière intervention 14 février 2008 - 14 févr. 2008 à 16:32
cs_MPi Messages postés 3877 Date d'inscription mardi 19 mars 2002 Statut Membre Dernière intervention 17 août 2018 - 15 févr. 2008 à 22:32
Bonjour à vous,


 


Je souhaiterais écrire un code VB qui remplisse une ligne à chaque fois qu'une condition est réalisée.


 


Concrètement dans ma colonne B, j'ai des cellules contenant "supprimé", dans ce cas, je souhaiterais que la ligne soit mise en rouge.


 


La difficulté supplémentaire est que la formule doit se répéter sur tout le tableau (loop ?)


 


Merci de vos réponses !!


 


JF

5 réponses

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
14 févr. 2008 à 16:41
tu es donc en VBA, et non en .Net, je suppose...

 Thèmes / VB.NET et VB 2005 /

pour ton probleme ; une boucle irait (dans l'evenement Change de ton worksheet, par exemple)

Renfield
Admin CodeS-SourceS- MVP Visual Basic
0
cs_MPi Messages postés 3877 Date d'inscription mardi 19 mars 2002 Statut Membre Dernière intervention 17 août 2018 23
14 févr. 2008 à 23:05
Utilise la mise en forme conditionnelle (menu Format).
Tu n'auras même pas besoin de programmation.

MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI
0
zen69 Messages postés 584 Date d'inscription jeudi 28 décembre 2006 Statut Membre Dernière intervention 29 avril 2010 1
15 févr. 2008 à 21:18
si non en vba tu peux toujours faire quelque chose de ce type.

dim i as integer, j as integer

i = 1
j = 1000 'Derniere ligne

do while (i <= j)
   .range(i & ":" i).interior.colorindex = iif(.range("B" & i).formula="supprimé", 3, xlnone)
   i = i +1
loop

ca deverait faire tu n'as qu'a modifier les valeur initiale de i et de j et ca deverait etre good

<hr width="100%" size="2" />
  zen69 aka Ortho Le Profett
  [site web]
0
zen69 Messages postés 584 Date d'inscription jeudi 28 décembre 2006 Statut Membre Dernière intervention 29 avril 2010 1
15 févr. 2008 à 21:19
Correction :

.range(i & ":" & i).interior

<hr width="100%" size="2" />
  zen69 aka Ortho Le Profett
  [site web]
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
cs_MPi Messages postés 3877 Date d'inscription mardi 19 mars 2002 Statut Membre Dernière intervention 17 août 2018 23
15 févr. 2008 à 22:32
Salut zen69,

Il faudrait enlever le point devant Range, puisqu'aucun With n'est déclaré ...
Autant y aller avec Rows(i)

Mais je n'aime pas particulièrement colorer une ligne complète si certaines cellules suffisent. C'est gourmand ces couleurs-là...

MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI
0
Rejoignez-nous