Bonjour
Ici, tu tapes ton nombre en Feuil1 colonne A et tu le retrouves en Feuil2!A2
Code de Feuil1
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then
Sheets("Feuil2").Range("A2")=Target.Value
End If
End Sub
Si tu veux que cela se fasse quelle que soit ta colonne, tu changes le Range("A:A") par Range("A:IV")
Cordialement