cellule colorée

[PHILOU]

Bonjour a tous, ici Philou !!!

Voila j'ai un petit probleme je debute dans les variables et voila ce que je veux faire...
J'ai une feuil1 avec un tableau B6:F21

Je voudrais que lorsque les cellules de la colonne F ne sont pas vide, la couleur de la cellule B correspondant à la ligne change...

J'ai tapé ceci dans le code de la Feuil1, mais bien sur ca marche po (je m'en doutais, mais c'est comme ca qu'on progresse non?


Sub couleur_cellules()
Dim i As Variant
For i = 6 To 21
If Sheets('Feuil1').Range('F' & i) <> '' Then
Sheets('Feuil1').Range('B' & i).BackColor = 12
End If
Next i
End Sub


Qu'est ce qui ne va pas la dedans???

 

[Rai]

Salut,

Rien de grave à priori 😉

Pour commencer, une chtite pinaillerie :
tu déclares I comme variant. Ca ne sert pas à grand chose, par défaut les variables sont toutes des variants.
I étant un nombr entier, soit tu le déclare en Integer (si tu es s&ucirc;r que I ne dépassera pas 32767), soit en Long

Ensuite, la propriété BackColor que tu veux utiliser n'est pas utilisée par les objets Cell ou Range.
Pour obtenir l'effet souhaité, il faut définir la couleur d''Interior.

Code a voir ci-dessous :

Sub couleur_cellules()
Dim i As Long
With Sheets('Feuil1')
For i = 6 To 21
If .Range('F' & i) <> '' Then
.Range('B' & i).Interior.ColorIndex = 12
End If
Next i
end with
End Sub


Bonne soirée

 

[PHILOU]

Merci BEAUCOUP Rai !!!

Merci tout d'abord pour avoir complété (ou plus réarrangé complètement) ma formule...
Mias surtout un grand MERCI pour m'avoir expliqué en quelques mots o&ugrave; était mon... heu... MES erreurs !!!

Super cool !!!

A+

 

[PHILOU]

Oups... Si tu es encore la Rai, en fait je viens de tenter le truc et ca marche po....

Une petite idée ???

 

[lapinou1]

Salut !

y'a une autre solution si tu veux, le format conditionnel :

tu sélectionne ta plage B6:B21 et en format conditionnel tu mets cette formule =($F21<>0)

ça te convient ?

@+

 

[PHILOU]

Merci Lapinou1 !!!

Parfait
🙂

 

[lapinou1]

de rien 'sieur 🙂

le désavantage de cela est que tu es limité à 3 conditions, mais bon c'est miuex que rien 😛