Erreur petite Macro VBScript

Résolu/Fermé
crapoulou Messages postés 28160 Date d'inscription mercredi 28 novembre 2007 Statut Modérateur, Contributeur sécurité Dernière intervention 21 mai 2024 - 17 févr. 2011 à 16:50
crapoulou Messages postés 28160 Date d'inscription mercredi 28 novembre 2007 Statut Modérateur, Contributeur sécurité Dernière intervention 21 mai 2024 - 18 févr. 2011 à 10:56
Bonjour à tous,

Je voudrais faire une macro qui scanne.
J'ai trouvé sur Internet ceci :

(Source)

Sub Insert_picture_using_scanner()
WordBasic.InsertImagerScan
End Sub 


C'est presque parfait, j'ai mon logiciel pour scanner qui s'ouvre et je peux scanner.
Or, si je clique sur Cancel, j'ai un message d'erreur (Run-time error 102).

Message d'erreur affiché.

J'ai voulu faire une sorte de try... catch mais sans succès avec On Error Resume Next.
Merci beaucoup du coup de main.


A voir également:

1 réponse

crapoulou Messages postés 28160 Date d'inscription mercredi 28 novembre 2007 Statut Modérateur, Contributeur sécurité Dernière intervention 21 mai 2024 7 998
18 févr. 2011 à 10:56
Bonjour,

Résolu.
en programmation classique, la gestion de l'erreur se fait après l'instruction.
Or, je ne savais pas que c'était l'inverse en VBScript.

Ce code ne fonctionnait pas :
Sub Scan()
WordBasic.InsertImagerScan
On Error Resume Next
End Sub


Celui-ci fonctionne :
Sub Scan()
On Error Resume Next
WordBasic.InsertImagerScan
End Sub



Merci quand même.
Crapoulou.
1