VBA - créer une macro qui s'applique à l'ensemble des lignes

[A_fond_alphonse]

Bonjour à tous,
Je suis nouveau en VBA.
J'utilise la fonction Range afin d'éffectuer un contrôle. Je souhaite que ma macro s'applique à l'ensemble des lignes de mon fichier plutot que de devoir recréer la condition pour chaque ligne de mon fichier. Soit une condition sur les lignes 7,8,9,10.....10490000
Je vous remercie de votre aide!
Ci-dessous mon VBA :

Private Sub Worksheet_Change(ByVal Target As Range)

If Range("F7").Value = Range("G7").Value Then
Range("H7").Value = "yes"
Else
Range("H7").Value = "no"
End If

End Sub

A_fond_Alphonse

 

[Guest]

Re : VBA - créer une macro qui s'applique à l'ensemble des lignes

Bonjour,

Si j'ai bien compris. Par contre ne traite pas le cas où Fx et Gx sont vides ou vidées

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Union(Range("F7:F" & Rows.Count), Range("G7:G" & Rows.Count))) Is Nothing Then
        If Range("F" & Target.Row) = Range("G" & Target.Row) Then
            Range("H" & Target.Row) = "yes"
        Else
            Range("H" & Target.Row) = "no"
        End If
    End If
End Sub

A+

 

[A_fond_alphonse]

Re : VBA - créer une macro qui s'applique à l'ensemble des lignes

Merci à toi Hasco,
Et vive les ventres à choux.... Je suis sur Montiaug et originaire de Soullans