Ich vergleiche in einer Arbeitsmappe mit mehreren Tabellen
ständig die ankommenden Werte(via DDE-LINK in Zellen eingespiesen) von zwei bestimmten Spalten.Ist der Wert der ersten Zelle in der ersten Spalte höher als der Wert in der Zelle der zweiten Spalte, dann sollte dieser Wert in der Zelle der zweiten Spalte übernommen werden und zusätzlich in einer folgenden Spalte die Zeit und das Datum der Aenderung niedergeschrieben werden.
Diese Abfrage findet in jeder Tabelle gleichzeitig statt und über mehrer Zellen in den gleichen zwei Spalten.
Ich habe in eurem super Forum bereits einen VBA-Code gefunden und an meine Bedürfnisse angepasst, leider funktioniert er nicht. Ich wäre dankbar für einen Hinweis.
Private Sub Worksheet_Calculate()
Dim iRow As Variant, iRowL As Variant
iRowL = Range(Worksheets(17).Cells(Rows.Count, 1)).End(xlUp).Row
For iRow = 1 To iRowL
If Range(Worksheets(17).Cells(iRow, 1)) > Range(Worksheets(17).Cells(iRow, 2)) Then
Range(Worksheets(17).Cells(iRow, 3)).Value = Now
End If
Next iRow
End Sub