Erreur petite Macro VBScript
Résolu
crapoulou
Messages postés
28195
Date d'inscription
Statut
Modérateur, Contributeur sécurité
Dernière intervention
-
crapoulou Messages postés 28195 Date d'inscription Statut Modérateur, Contributeur sécurité Dernière intervention -
crapoulou Messages postés 28195 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
- Jitbit macro recorder - Télécharger - Confidentialité
- Petite croix snap ✓ - Forum Snapchat
- Erreur 0x80070643 - Accueil - Windows
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.
