-
Privacywetgeving
Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.
Datum in Excel.
- Onderwerp starter helmus
- Startdatum
- Status
jzeedijk
Gebruiker
- Lid geworden
- 30 jul 2003
- Berichten
- 926
Hoi Helmus,
Het voordeel van de klok is dat iedere seconde het spreadsheet herberekend wordt, zodoende wordt iedere seconde gekeken of de datum juist is.
Schakel je herberekenen uit in het werkblad dan heb je pech, dan werken de oplossingen Vandaag() en Nu() niet.
Sub Tijd()
Dim interval As Date
interval = TimeValue("00:00:01")
Worksheets(1).Range("A1") = Format(Time, "hh:mm:ss")
Worksheets(1).Range("A2") = Format(Date, "d-m-yyyy")
Application.OnTime Now + interval, "Tijd"
End Sub
Deze macro staat in Modules - module 1 (zie eerder antwoord)
Jeroen
Het voordeel van de klok is dat iedere seconde het spreadsheet herberekend wordt, zodoende wordt iedere seconde gekeken of de datum juist is.
Schakel je herberekenen uit in het werkblad dan heb je pech, dan werken de oplossingen Vandaag() en Nu() niet.
Sub Tijd()
Dim interval As Date
interval = TimeValue("00:00:01")
Worksheets(1).Range("A1") = Format(Time, "hh:mm:ss")
Worksheets(1).Range("A2") = Format(Date, "d-m-yyyy")
Application.OnTime Now + interval, "Tijd"
End Sub
Deze macro staat in Modules - module 1 (zie eerder antwoord)
Jeroen
- Status
