Office: Letzer Wert einer Zelle VOR Änderung

Moin, myfake,

Altbekanntes und Grundlegendes: die Ursachen der Formelveränderung protokollieren...

 

Hallo Jinx,

war mir nicht bekannt.

Sollte es tatsächlich so sein, dann hätte es sich (in dem Fall) für mich erledigt, denn die Ursache ist recht schlecht zu protokollieren, da es sich um einige tausend Einträge handelt (bzw. handeln kann). Und diese Änderungen will ich nicht dokumentieren, sondern nur die Auswirkungen.

Gibt es denn eine Möglichkeit Ergebnisse zu protokollieren? Denn es ist schon unschön, wenn eine solch wichtige Funktion nicht zur Verfügung steht.

Auf jeden Fall schon einmal danke für Deinen Hinweis.

cu
myfake

 

Moin, myfake,

es gitb das Worksheet_Calculate-Ereignis, was man dafür nehmen könnte. Die Ausgabe der Werte kann entweder durch das Erzeugen einer (Backup-)Mappe mit Festwerten oder eines Textfiles mit den Werten erfolgen - die zweite Möglichkeit ist platzsparender...

 

Hallo Jinx,

ich hoffe mal, dass ich der Sache langsam näher komme. Momentan hänge ich aber noch an der Übergabe der "alten" Werte.

Ich habe es wie folgt versucht ...
***
Option Explicit
Option Base 1
Public arrNumbersOld As Variant

Public Sub Worksheet_Activate()

Dim arrNumbersOld(4) As Variant
Dim i As Integer

'Arrayfelder Old befüllen
For i = 1 To 4
arrNumbersOld(i) = Cells(i + 2, 2).Value
Debug.Print arrNumbersOld(i)
Next i

End Sub

Private Sub Worksheet_Calculate()

Dim i As Integer
Dim arrNumbersNew(4) As Variant
Dim arrNumbersOld(4) As Variant
Dim Target As Range

Set Target = UsedRange

'Arrayfelder Old befüllen
For i = 1 To 4
Debug.Print arrNumbersOld(i)
Next i

If Intersect(Target, Range("B3:B6")) Is Nothing Then Exit Sub

'Arrayfelder New befüllen
For i = 1 To 4
arrNumbersNew(i) = Cells(i + 2, 2).Value
Debug.Print arrNumbersNew(i)
Next i

End Sub
***
... aber leider ist bei Aktivierung des Calculate Ereignisses "arrNumbersOld(i)" leer. Wo liegt denn der Fehler bei der Festlegung der globalen Variablen?

Vielen Dank nochmals für Deine Hilfe.

cu
myfake

 

Moin, myfake,

die Grundlagen der Programmierung studieren... *grins

Es ist möglich, den Namen einer Variablen mehrfach zu verwenden - wenn jedoch innerhalb einer Prozedur der Name einer globalen Variablen erneut definiert/dimensionert wird, "kennt" diese Prozedur die globale Variable nicht. sondern nur die interne Variable.

Weiterhin definierst Du ein globales Datenfeld, ohne dieses später in den Prozeduren zu dimensionieren:

Code:

 

Hallo Jinx,

*grins* da bin ich ja gerade dran

Klar doch, jetzt wo Du es sagst *wink.gif*

Herzlichen Dank für Deine Hilfe. Ich habe es gerade mal eingebaut und es läuft jetzt erst einmal so, wie es sollte. Jetzt sollte es eigentlich möglich sein, mit diesem Ansatz weiterzuarbeiten.

Ich melde mich wieder wenn ich a) fertig bin (dann mit dem Code) oder b) weitere Hilfe brauche *wink.gif*

cu
myfake