Tableau VBA

Bonjour,

J'ai 2 tableaux sur ma feuil1.

Le 2ième tableau est un résumé du 1er tableau.

J'aimerai que si dans mon 1er tableau il y un "ü" en colonne A et un "COM" en colonne H alors ca recopie la valeur de la colonne C (de la même ligne) dans mon 2ième tableau en colonne M.

Range tableau 1: A3:H112

Range tableau 2: M3:O11

Voici ce que j'aimerai coder en VBA:

Private Sub Worksheet_Change(ByVal Target As Range)

'Si on ne saisi pas "ü" dans la colonne A ca ne fait rien

'Si on saisi pas "COM" dans la colonne H ca ne fait rien

'Recuperation de la valeur en colonne C ou on a saisi "ü"

'Copier la valeur

'Coller la valeur dans la colonne H à la partir de la ligne 4

End Sub

Merci d'avance

Bonsoir,

Pourquoi ne l'écris-tu pas ?

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim n%
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Union(Me.Range("A3:A112"), Me.Range("H3:H112"))) Is Nothing Then
        n = Target.Row
        If Me.Range("A" & n) = "ü" And Me.Range("H" & n) = "COM" Then Me.Range("M" & n) _
         = Me.Range("C" & n)
    End If
End Sub