VB excel, changer de ligne
Résolu/Fermé
D-Rabbit
-
20 janv. 2010 à 16:29
Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 - 21 janv. 2010 à 10:39
Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 - 21 janv. 2010 à 10:39
A voir également:
- VB excel, changer de ligne
- Changer dns - Guide
- Aller à la ligne excel - Guide
- Liste déroulante excel - Guide
- Site de vente en ligne particulier - Guide
- Partage de photos en ligne - Guide
24 réponses
tompols
Messages postés
1273
Date d'inscription
jeudi 29 juillet 2004
Statut
Contributeur
Dernière intervention
25 novembre 2013
435
21 janv. 2010 à 10:23
21 janv. 2010 à 10:23
Re, de rien mais j'étais en train d'éditer mon dernier msg...donc :
autre remarque, ce code ne fait qu'une mise en forme en fonction de tes conditions, pourquoi ne pas utiliser une simple mise en forme conditionnelle ?
autre remarque, ce code ne fait qu'une mise en forme en fonction de tes conditions, pourquoi ne pas utiliser une simple mise en forme conditionnelle ?
je ne savais pas qu'avec les mises en forme conditionnelles on pouvait faire ça, du moins tout ça.
et puis il fallait que ça s'exécute par un bouton et frenchement ça me tentait bien de me lancer là-dedans dans le cadre du boulot :)
et puis il fallait que ça s'exécute par un bouton et frenchement ça me tentait bien de me lancer là-dedans dans le cadre du boulot :)
Bidouilleu_R
Messages postés
1181
Date d'inscription
mardi 27 mai 2008
Statut
Membre
Dernière intervention
12 juillet 2012
293
21 janv. 2010 à 10:32
21 janv. 2010 à 10:32
je pense que tu peux simplifier ton code
avec une boucle for each..... next
je pense que tu devrais utiliser .Interior.colorindex = 3 ( ou une autre valeur)
ainsi tu aurais directement ta couleur.
par contre je ne comprends pas bien ton test and d < J
un exemple de boucle for each
si tu précises la référence de d et j je te l'écris
avec une boucle for each..... next
je pense que tu devrais utiliser .Interior.colorindex = 3 ( ou une autre valeur)
ainsi tu aurais directement ta couleur.
par contre je ne comprends pas bien ton test and d < J
un exemple de boucle for each
si tu précises la référence de d et j je te l'écris
Sub test1() Dim C As Variant For Each C In Sheets("Feuil9").Range("G6:G55") If C.Value <> "Terminée" And d < j Then C.Interior.Color = 3 ElseIf d > j - 7 Then C.Interior.Color = 4 End If Next End Sub
Bidouilleu_R
Messages postés
1181
Date d'inscription
mardi 27 mai 2008
Statut
Membre
Dernière intervention
12 juillet 2012
293
21 janv. 2010 à 10:39
21 janv. 2010 à 10:39
bien comme c'est résolu!
bonne journée à tous.
en plus je dis colorindex et j'écris .color ....
besoin de vacances peut-être...
bonne journée à tous.
en plus je dis colorindex et j'écris .color ....
besoin de vacances peut-être...