Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
408to412
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
408to412
408to412
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Interval

Interval
04.04.2004 10:04:39
Rolf
Hallo Leute
ich habe eine Zeitverzögerung die sollte
jedoch kleiner als eine Sekunde sein also
Now+TimeValue("00:00:01") ist zu gross.
Wer kennt sich aus??
Grüsse
Rolf

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Interval
04.04.2004 10:25:52
Josef Ehrensberger
Hallo Rolf!
Vielleicht hilft dir das!
Option Explicit
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Sub test()
Sleep (500) 'Zeit in Millisekunden
MsgBox "Hallo!"
End Sub

Code eingefügt mit: Excel Code Jeanie

Gruß Sepp


Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.

(Sir Winston Churchill)


Anzeige
AW: Interval
04.04.2004 11:37:00
Rolf
Hallo Josef
dein Makro arbeitet alleine sehr gut
jedoch lässt es sich nicht bei mir
einbauen.Zur übersicht gebe dir das Ganse
also

Sub Start()
NaechsterRun=Now+TimeValue("00:00:01")
Application.OnTime NachsterRun,"Start"
meinMakro
End Sub

AW: Interval
04.04.2004 11:42:52
Josef Ehrensberger
Hallo Rolf!
Vielleicht so!

Sub test()
Do
DoEvents
Sleep (500) 'Zeit in Millisekunden
meinMakro
Loop
End Sub

Code eingefügt mit: Excel Code Jeanie

Gruß Sepp


Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.

(Sir Winston Churchill)


Anzeige
AW: Interval
04.04.2004 14:43:31
Rolf
Hallo Josef
WUNDERBAR!!
DANKE SEHR
GRÜSSE
Rolf

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige