Toon posts:

[Excel VBA] timer

Pagina: 1
Acties:

Verwijderd

Topicstarter
Ik wil een macro om een bepaalde interval starten. (ik wil de macro elke 5 minuten laten afspelen). Ik weet dat VBA de functie timer heeft maar ik kom er eerlijk gezegd er niet uit.

  • Woudloper
  • Registratie: November 2001
  • Niet online

Woudloper

« - _ - »

Gewoon een timer op je formulier plaatsen of via internet (bijvoorbeeld bij: VBNet) een class downloaden waardoor je een timer vanuit de code kan starten...

edit:
Toevoeging: kijk hier eens

[ Voor 23% gewijzigd door Woudloper op 24-01-2005 16:38 ]


Verwijderd

Misschien zou je even kunnen vertellen wat je tot nu geprobeerd hebt, en waar je bent vastgelopen. Want als ik op F1 druk en timer in toets, zie ik uitleg...

Verwijderd

Topicstarter
Als ik het voorbeeld overneem (van f1) dan doet de timer het niet. Mijn kennis van vba reikt niet zo ver dat ik direct fouten of te kortkoming in voorbeelden kan herkennen.

  • F_J_K
  • Registratie: Juni 2001
  • Niet online

F_J_K

Moderator CSA/PB/AI

Front verplichte underscores

Inderdaad, met de F1 knop in de hand klinkt dit toch eigenlijk wel simpel hoor ;)

Geef even aan welke code je hebt en waar je vastloopt: anders komen we met een antwoord "zie F1" en daar heb je blijkbaar niet genoeg aan :) Zegmaar wat wordt genoemd in P&W Beleid
quote: F1
Timer Function Example
This example uses the Timer function to pause the application. The example also uses DoEvents to yield to other processes during the pause.
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Press Yes to pause for 5 seconds", 4)) = vbYes Then
    PauseTime = 5    ' Set duration.
    Start = Timer    ' Set start time.
    Do While Timer < Start + PauseTime
        DoEvents    ' Yield to other processes.
    Loop
    Finish = Timer    ' Set end time.
    TotalTime = Finish - Start    ' Calculate total time.
    MsgBox "Paused for " & TotalTime & " seconds"
Else
    End
End If
Wat werkt er dan precies niet. Foutmeldingen?

'Multiple exclamation marks,' he went on, shaking his head, 'are a sure sign of a diseased mind' (Terry Pratchett, Eric)


Verwijderd

Topicstarter
De applicatie van woudloper werkt perfect. deze kan ik toepassen voor de intervallen.
Bedankt :)
Pagina: 1