changement couleur fond cellule avec macro

[raptor65]

bonjour

je souhaiterai modifier la couleur de fond des cellule de la colonne F si la valeur est inférieure à 10% de celle de la colonne C .
j'ai commencé à faire une macro mais ça ne fonctionne pas

Cordialement

 

[jpb388]

Re : changement couleur fond cellule avec macro

Bonjour à Tous

Sub ChgCouleur()
Dim i As Integer
For i = 3 To 11
If Cells(i, 1) < (Cells(i, 3) * 0.1) Then
Cells(i, 3).Interior.Color = 6
End If
Next
End Sub

il vaudrait mieux mettre des chiffres en colonne A

 

[ERIC S]

Re : changement couleur fond cellule avec macro

Bonjour

moi couleur de cellule = mise en forme conditionnelle, pas macro
sélectionne toutes les cellules concernées en F
onglet accueil - mise en forme conditionnelle - nouvelle règle -
appliquer une mise en forme aux cellules qui contiennent
valeur inférieure à $C3*10%
format - remplissage (et tu choisis ta couleur de fond)

edit : bonjour Jpb

 

[raptor65]

Re : changement couleur fond cellule avec macro

ça ne fonctionne pas
les fond ne se modifient pas

 

[raptor65]

Re : changement couleur fond cellule avec macro

je voulais réaliser une macro pour changer de méthode

 

[ERIC S]

Re : changement couleur fond cellule avec macro

re

modif à chaque changement de contenu en F si une seule cellule sélectionnée

Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer
If Target.Count > 1 Then Exit Sub
If Not Target.Column = 6 Then Exit Sub
If Target.Value < Target.Offset(0, -3).Value * 0.1 Then
    Target.Font.ColorIndex = 6
Else
    Target.Font.ColorIndex = none
End If
End Sub

 

[jpb388]

Re : changement couleur fond cellule avec macro

re
Bonjour ERIC S

raptor65 exact je me suis trompé de colonne mais avec ERIC S tu es entre de bonne mains