• 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.

VBA Excel

Status
Niet open voor verdere reacties.
VBA Ecxel

Hoi edmoor,
Doet het correct, dank u hartelijk, maar waar was ik dan fout?
mvg, Eric
 
Je had er in ieder geval geen enkele code in staan om een lopende klok te hebben.
 
Die zit uiteraard in het document dat ik plaatste.
 
VBA Ecxel

Edmoor , dank u , zal wel even proberen te vinden en begrijpen!
mvg, Eric, en nog een prettige zondag gewenst!
 
Het staat in de module onder je welkomst bericht.

Code:
Sub StartTimer1()
    Application.OnTime Now + TimeValue("00:00:01"), "NextTick1"
End Sub

Sub NextTick1()
    ActiveSheet.Range("A1").Value = Date
    ActiveSheet.Range("N1").Value = Time
    StartTimer1
End Sub

Sub StopTimer1()
    On Error Resume Next
    Application.OnTime Now + TimeValue("00:00:01"), "NextTick1", , False
End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan