Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
02.02.2021 22:12:07 |
Forelli |
|
|
|
02.02.2021 22:35:00 |
Mase |
|
|
|
03.02.2021 18:05:37 |
Forelli |
|
|
Application.OnTime TimeValue läuft nur einmal durch |
03.02.2021 21:41:01 |
Mase |
|
|
Von:
Mase |
Datum:
03.02.2021 21:41:01 |
Views:
719 |
Rating:
|
Antwort:
|
Thema:
Application.OnTime TimeValue läuft nur einmal durch |
Gerne.
Wie Dein Makro überhaupt startet, was es bezweckt, weisst nur Du. Letztlich kann ich nur auf Deine Fragen antworten. Ob diese zum Ablauf passen, musst Du für Dich dann selbst entscheiden.
Dementsprechend schaust Dir mal folgendes an:
Option Explicit
Private Declare PtrSafe Function GetAsyncKeyState Lib "user32" ( _
ByVal nVirtKey As Long) As Integer
'*** Const
Private Const mc_ESCAPE As Long = &H1B
'
Sub Endlosschleife()
Do Until GetAsyncKeyState(mc_ESCAPE)
'*** TODO ...
'*** Merke Zeitpunkt ab erstem Start
'*** Bedingung: Prüfe ob 1:15 vergangen und starte das Makro
DoEvents
Loop
End Sub
Hinweis:
Abbruchbedingung der Endloschleife ist hierbei die Escape-Taste.
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
02.02.2021 22:12:07 |
Forelli |
|
|
|
02.02.2021 22:35:00 |
Mase |
|
|
|
03.02.2021 18:05:37 |
Forelli |
|
|
Application.OnTime TimeValue läuft nur einmal durch |
03.02.2021 21:41:01 |
Mase |
|
|