Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
336to340
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
336to340
336to340
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Makro abbrechen ohne Meldung

Makro abbrechen ohne Meldung
11.11.2003 19:30:10
tomi
Hallo,

ich habe einen Timer der rückwärts läuft, möchte ihn bei Bedarf ohne Meldung abbrechen.

mfg Tomi

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro abbrechen ohne Meldung
11.11.2003 19:37:42
Nepumuk
Hallo Tomi,
das ist, ohne die leiseste Ahnung von deinem Code zu haben, ein Fall für den Wahrsager.
Gruß
Nepumuk
AW: Makro abbrechen ohne Meldung - hier der Code
11.11.2003 19:39:02
tomi
Hallo,

hier der Code:

Sub uhr()
For I = 120 To 1 Step -1
Range("c2") = I
jetzt = Time
Ende = jetzt + TimeValue("00:00:01")
Do While jetzt < Ende
jetzt = Time
Loop
Next I
End Sub

AW: Makro abbrechen ohne Meldung - hier der Code
11.11.2003 20:01:33
Nepumuk
Hallo Tomi,
weise dem Makro "Ende" eine Tastenkombination zu. Mit dieser kannst du das Makro "Uhr" anhalten.


Option Explicit
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Public bolHalt As Boolean
Public Sub Uhr()
Dim intCount As Integer
For intCount = 120 To 1 Step -1
Range("c2") = intCount
Sleep 1000
DoEvents
If bolHalt Then Exit For
Next
bolHalt = False
End Sub
Public Sub Ende()
bolHalt = True
End Sub



Code eingefügt mit: Excel Code Jeanie

Gruß
Nepumuk
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige