Hallo Zusammen,
Mein Problem: Ein Eurobetrag in Zelle E7 soll sich ändern, wenn ich in Zelle H7 eine Teilzahlung eingebe. Das Ganze soll aber in der gesamten Spalte funktionieren ( also in Spalte E und in Spalte H)
Im Netz habe ich das für eine Zelle gefunden:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Application.EnableEvents = False
Range("A20").Value = Range("A20").Value - Range("A1").Value
On Error GoTo ERRORHANDLER
ERRORHANDLER:
Application.EnableEvents = True
End Sub.
Für Eure kompetente Hilfe wäre ich Euch sehr sehr danbkbar!!!!
Herzliche Grüße, Wilfried
|