Datum aktualisieren
08.09.2021 15:43:15
Luca
ich habe in Excel eine Datenbank mithilfe einer Userform aufgebaut. Die Userform enthält verschiedene Button, welche auf verschiedene Worksheets führen. Nun gibt es einen Button mit Update_Data. Sobald dieser getätigt wird, soll in einer gewissen Zelle in der Datenbank das aktuelle Datum erscheinen.
Leider aktualisiert sich das Datum derzeit aber schon beim öffnen der Excel-Datei.
Kann mir hier jmd. weiterhelfen?
Private Sub Button_Update_Data_Click()
Dim wsZiel As Worksheet
Call Update_Data
Set wsZiel = ThisWorkbook.Sheets(WS_Database)
wsZiel.Range("C2").FormularR1C1 = "=TODAY()"
End Sub
Anzeige