Fichier VBScript lancé au démarrage de session + 1minute30

Y compris Power BI, Power Query et toute autre question en lien avec Excel
W
Winniechips
Nouveau venu
Nouveau venu
Messages : 3
Inscrit le : 31 juillet 2015
Version d'Excel : 2010 FR

Message par Winniechips » 31 juillet 2015, 16:44

Bonjour,

J'ai créé un fichier excel contenant une macro (ma macro fonctionne) et un fichier vbscript permettant de lancer cette macro au démarrage de ma session. Le fichier vbscript est donc placé dans le dossier démarrage de ma session.

Le problème qui se pose aujourd'hui, c'est que mon fichier excel se trouve sur un réseau commun (disque dur externe) et que le démarrage de ma macro est plus rapide que ma connexion au réseau. Par conséquent, ma macro ne peut pas s'exécuter.

J'ai essayé d'utiliser Application.OnTime mais j'obtiens une erreur sur cette ligne.
Je vous mets le code du fichier vbscript juste en dessous :
Dim xlApp, xlWbk
    Set xlApp = CreateObject("Excel.Application")
    xlApp.EnableEvents = False
    Set xlWbk = xlApp.Workbooks.Open("\\Disque Dur\Data\Fichier Test.xlsm")
    Application.OnTime Now() + TimeValue("00:01:30"), xlwbk
    xlWbk.Ma_Macro
    xlWbk.Close
    Set xlWbk = Nothing
    xlApp.EnableEvents = True
Si quelqu'un aurait une solution à me proposer...

Merci par avance.
Winniechips
h
h2so4
Passionné d'Excel
Passionné d'Excel
Messages : 9'175
Appréciations reçues : 377
Inscrit le : 16 juin 2013
Version d'Excel : 365 UK Windows 10

Message par h2so4 » 31 juillet 2015, 16:53

Bonjour,

le paramètre pour application.ontime doit être le nom d'une macro

essaie ceci (non testé)

remplace
Application.OnTime Now() + TimeValue("00:01:30"), xlwbk
    xlWbk.Ma_Macro
    xlWbk.Close
    Set xlWbk = Nothing
par
Application.OnTime Now() + TimeValue("00:01:30"), xlwbk.Ma_Macro
ton classeur doit rester ouvert pour que la macro s'exécute.
W
Winniechips
Nouveau venu
Nouveau venu
Messages : 3
Inscrit le : 31 juillet 2015
Version d'Excel : 2010 FR

Message par Winniechips » 31 juillet 2015, 17:03

Merci pour votre réponse.

Je viens d'essayer et j'obtiens une erreur Ligne 5 caractère 9, objet requis 'Application', erreur d'exécution Microsoft VBScript, juste en testant le fichier vbscript sans redémarrer mon PC
h
h2so4
Passionné d'Excel
Passionné d'Excel
Messages : 9'175
Appréciations reçues : 377
Inscrit le : 16 juin 2013
Version d'Excel : 365 UK Windows 10

Message par h2so4 » 31 juillet 2015, 19:03

re bonjour,

essaie
avec
xlapp.OnTime Now() + TimeValue("00:01:30"), xlwbk.Ma_Macro
W
Winniechips
Nouveau venu
Nouveau venu
Messages : 3
Inscrit le : 31 juillet 2015
Version d'Excel : 2010 FR

Message par Winniechips » 3 août 2015, 09:16

Bonjour,

Merci encore de votre aide.
Mais j'ai toujours une erreur : Ligne 5 caractère 9 : la méthode Ontime de la classe Application a échoué.
Par contre la macro s'exécute quand même.

Auriez-vous une idée du problème ?
Merci par avance
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message