|
Hallo miteinander,
ich habe folgendes Problem, und hoffe, dass mir von Euch jemand helfen kann.
Ich habe folgendes Makro benutzt und wollte, dass das Makro ausgeführt wird, sobald sich der Wert einer Zelle verändert. Das Makro funktioniert auch, wenn ich die Zelle manuell verändere. In der besagten Zelle steht aber ein Datum - =HEUTE() - und das Makro soll ausgeführt werden, wenn sich das Datum ändert, also um 00:01 Uhr am nächsten Tag. Das tut es aber nicht. Ist so etwas generell nicht möglich oder kann das Makro dementsprechend abgeändert werden?
Hat jemand eine Idee?
Ich würde mich sehr freuen.
Hier das Makro:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
' The variable KeyCells contains the cells that will
' cause an alert when they are changed.
Set KeyCells = Range("f1:g1")
If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then
' Display a message when one of the designated cells has been
' changed.
' Place your code here.
'Hier würde dann das auszuführende Makro stehen.
End If
End Sub
|