Bonjour,
Cela va être un peu compliqué si vous démarrez. Dans le fichier joint, j'ai mis un événement qui répond à votre demande si un changement intervient sur les cellules A1 ou A2 et si A2 contient un X. La copie se fait intégralement et pas seulement en valeur.
L'événement dans le module de l'onglet Feuil1
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A1:A2")) Is Nothing Then
If Range("A2") = "X" Then
Range("A1").Copy Destination:=Sheets("Feuil2").Range("A1")
End If
End If
End Sub
Sinon, si c'est une simple formule dans la cellule A1 de Feuil2 que vous souhaitez :
=SI(Feuil1!A2="X";Feuil1!A1;"")
Mais il faudrait indiquer à quoi doit être égal la cellule si A2 est différent de X.