habe wieder ein Problem.
Ausgangssituation:
im Sheet "Erfassen" Spalte G, werden ab Zeile 22 bis .... Eingaben getätigt, die zum Sheet "Rechnen" Zelle "H10" übertragen und in Zelle "K10" berechnet werden,das Ergebnis wird zum Sheet "Erfassen" Spalte H übertragen.
Habe mit Eurer Hilfe folgende Prozedur eingebaut:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Row < 22 Then Exit Sub
If Target.Column = 7 Then
Worksheets("Rechnen").[H10] = Target
Cells(Target.Row, 8) = Worksheets("Rechnen").[K10].Value
If IsEmpty(Target) Then Target.Offset(0, 1) = ""
End If
End Sub
Funktioniert bei direkter Eingabe auch prima.
Mein Problem:
Wenn ich nachträglich Daten verändere oder Daten reinkopiere erfolgt keine Neuberechnung.
Wie kann ich eine entsprechende generelle Überprüfung und eventuelle Neuberechnung veranlassen.
Hoffe, dass Ihr mir helfen könnt.
Gruß Thomas