Erreur petite Macro VBScript
Résolu
crapoulou
Messages postés
42848
Date d'inscription
Statut
Modérateur, Contributeur sécurité
Dernière intervention
-
crapoulou Messages postés 42848 Date d'inscription Statut Modérateur, Contributeur sécurité Dernière intervention -
crapoulou Messages postés 42848 Date d'inscription Statut Modérateur, Contributeur sécurité Dernière intervention -
Bonjour à tous,
Je voudrais faire une macro qui scanne.
J'ai trouvé sur Internet ceci :
(Source)
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.
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:
- Erreur petite Macro VBScript
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Petite amie virtuelle en français gratuit - Accueil - Intelligence artificielle
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Erreur 4101 france tv - Forum Lecteurs et supports vidéo
1 réponse
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 :
Celui-ci fonctionne :
Merci quand même.
Crapoulou.
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.
