mise en forme conditionnelle sur VBA Résolu/Fermé

Question

Bonjour, 
Je suis en train de faire un tableur de suivi de réponse pour ma recherche d'emploi.
J'aimerai donc créer une macro qui hachure la ligne correspondante à la valeur "non" dans une colonne. ce que je veux faire c'est si dans la colonne G je tape non sur une ligne alors cette ligne se hachure
Pour le moment ma macro ressemble à cela mais ma partie "if select range = non then" n'est pas correct apparemment comment la modifier.

Sub réponse()
Dim i As Integer
For i = 2 To 100
Range("g" & i).Select
if select range = non then
Range(g & i).Activate
 With Selection.Interior
        .Pattern = xlLightUp
        .PatternColorIndex = xlAutomatic
        .ColorIndex = xlAutomatic
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
    End If
End Sub

en vous remerciant par avance

Vaucluse · Answer

Bonjour 
pourquoi une macro alors qu'Excel permet de la faire avec les MFC et la formule, pour un nom en G1 et un tableau de A1 à Z100 par exemple: 
sélectionnez le tableau complet 
MFC par formule 
=$G1="non" 
format hachuré. 
(s'il s'agit d'Excel, bien sur)
crdlmnt 
Demandons nous si nous ne sommes pas seuls à comprendre ce que l'on explique?

michel_m · Answer

Bonjour,

bien que j' approuve totalement l'opinion et sa démonstration de ligne entière en MEFCde l'ami Vaucluse

ci joint proposition en VBA
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns("G")) Is Nothing Then
     If Target = "non" Then
          Rows(Target.Row).Interior.Pattern = xlLightUp
     Else
          Rows(Target.Row).Interior.Pattern = xlNone
     End If
End If
End Sub

macro événementiellement à copier-coller dans le module VBA de la feuille concernée

M... puissance 13 pour ta recherche de boulot

marmotte38630 · Answer

bonjour, michel_m 

merci pour l'idée de macro, pourrais tu éclairer ma lanterne car je comprends en gros la macro mais je connais pas "target" à quoi cela correspond-t il.

j'ai essayé la macro mais j'arrive pas à la lancer, comment dois'je faire.
existe-t-il une autre solution sans passer par une private sub?

Mise en forme conditionnelle sur VBA

3 réponses

Discussions similaires