Office: Aplication.wait funktioniert nicht

Hallo zusammen,

habe in einem Script eine Aplication.Wait Funktion eingebaut.
Leider wird dort nicht gewartet, sondern das Script läuft unbeeindruckt weiter.
Was mache ich falsch?
Code:

Hintergrund ist das der Kill Befehl um den Pfad zu löschen eher ausgeführt wird als ShellExecute den Ausdruck vorgenommen hat.
Dadurch kommt es zu einer Fehlermeldung das der Pfad nicht existiert.
Mein Gedanke war dann einfach das Script für ca. 20 Sek. zu unterbrechen und dann halt den Pfad wieder zu löschen.
Leider funktioniert das so nicht.

Besten Dank im Voraus Gruß Achim

:)

 

Hi,

was gibt dir diese MsgBox aus?

Code:

 

Hallo Marko,
die Msgbox hat keine spezielle Funktion.
Habe Sie nur zum Testen eingebaut ob das Aussetzten des Scriptes wirklich funktioniert.
Wenn ja dürfte die Box ja erst nach 20 s angezeigt werden.
Leider kommt sie sofort.

Gruß Achim

 

Code:

Die äußeren Klammern sind überflüssig - auch wenn das vermutlich nicht der Grund ist.

Hast Du es mal mit der Sleep-Funktion versucht?
Code:

Oder mit Application.Ontime?

 

Hallo EarlFred,

ja mit Sleep habe ich es auch schon probiert.
Das Ergebnis ist das gleiche.
Die Funktion Aplication.Ontime kenne ich leider nicht.
Wie würde diese bezogen auf meine Fall aussehen?

Gruß Achim

 

Hallo Achim,
hast du mal das probiert: Shell And Wait ?

 

Hallo Wolfgang,
ich schaue es mir morgen noch mal etwas genauer an.
Aber auf den ersten Blick übersteigt das meine Kenntnisse bei weitem.
Gruß Achim

 

Code:

 

Hallo EarlFred,

danke für deine Ausführung.
Leider komme ich damit nicht klar. Daher hier mal der gesamte Code, welcher in Outlook bei ThisOutlookSession eingefügt ist.
Mir ist bekannt das hier auch ein OL Forum gibt, bin aber davon ausgegangen das mein Problem hier besser aufgehoben ist, da es sich ja um ein klassisches VBA Problem handelt.
Code:

Leider Funktioniert es nicht. In dem Application.OnTime Befehl soll er ja eigentlich in die Sub WarteAb springen.
Dies ist leider nicht sol. Warum?

Hoffe das es klar ist.

Gruß Achim

 

kannst du bitte klarer formulieren? Was heißt "Funktioniert nicht"?

Nein. Application.Ontime stellt einen "Wecker", der zum besagten Zeitpunkt losrappelt und dann die Prozedur startet. Wenn Du schrittweise den Code durchläufst, sieht Du nur, wie er in der Zeile den "Wecker stellt".

Deinen konkreten Fall ausprobiert habe ich allerdings nicht. Ist mir ehrlich zu viel Aufwand, das nachzustellen.

 

Moin Achim,

das ist mir klar.
Hast Du meine Zeilen in ein neues Modul, die Arbeitsmappe.xlsm gespeichert, und die Prozedur gestartet/ausprobiert?

Wenn ja, was meldet diese MsgBox ?
Wenn nein, bin ich raus.


@EarlFred:
Klammern müssen nicht; dienen zur besseren Lesbarkeit.

 

Hallo EarlFred,

die Zeile wird zwar gelesen, aber beim nächsten Schritt springt er sofort in die nächste Zeile ohne das eine Verzögerung o. Pause (wie eigentlich gewollt) eingelegt wird.
Daher von mir die Aussage funktioniert nicht.

Gruß Achim

 

Hallo Marko,

sorry das habe ich irgendwie überlesen.
Die Box wirft einen Laufzeitfehler '438' aus mit der zusätzlichen Meldung
Objekt unterstützt diese Eigenschaft oder Methode nicht.

Gruß Achim

 

\@Mase

Du weißt aber, was die "überflüssigen" Klammern bewirken (abgesehen von der "Optik")? Wenn Du Optik willst, setz noch Call davor, dann sind die Klammern syntaktisch erforderlich und ohne Sonderwirkung.

@Kimba06

Die Funktion liegt darin: "Führe den Kill-Befehl zeitversetzt aus". Das habe ich als "Wille" verstanden, nicht das Warten in einer Codezeile.
Frage: Tut das mein Code?

Welche Box?

 

Stört uns das in diesem Fall?

Bezogen auf #11 und #2.