Erreur petite Macro VBScript

Résolu
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.



--
T'as un problème ? Passe sur CCM!
Il n'y a pas de problème sans solution.

1 réponse

  • Votes
  • Date
  • Date décroissante
  1. Modérateur
    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.