Bonjour à tous,
Pas évident de donner un titre explicite à ce problème...mais la finalité est bien de faire de la gestion d'erreur, sauf si vous avez une autre alternative.
Mon code va ouvrir un fichier Word via ce code :
Le lien http est un lien intranet. Or il se trouve que cette base intranet est très peu fiable et régulièrement en rade.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Set wrd = CreateObject("Word.Application") wrd.DisplayAlerts = wdAlertsNone wrd.Documents.Open "http://igd.com/projects/quality/cte/igdumr.nsf/VueDev18/STDM_MT5_NTE_002/$File/mt5_nte_002.doc?OpenElement" Application.DisplayAlerts = False wrd.visible = True wrd.ActiveDocument.SaveAs2 "C:\temp\EMT_cales.doc", AllowSubstitutions:=True wrd.ActiveDocument.Close wrd.DisplayAlerts = wdAlertsAll wrd.Quit
Quand mon code s'exécute alors que cette base est en rade, l'ouverture mouline, mouline...puis plante le PC sans aucun message d'erreur préalable.
Auriez-vous une idée pour tester auparavant le lien, ou bien au bout d'une certaine tempo abandonner l'ouverture ou quelque chose dans le genre...
D'avance merci pour votre aide !!!
Partager