Ich möchte ein Wert der z.B. in Zelle A1 steht, gleichzeitig in B1 haben ohne dass ich in B1
eine Formel eingebe. Ist dies möglich ?
Grüsse aus Trier
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
Application.EnableEvents = False
Range("B1").Value = Range("A1").Value
Application.EnableEvents = True
End If
End Sub