IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Lancement d'une macro par un scan de code-barres [XL-2010]


Sujet :

Macros et VBA Excel

  1. #1
    Membre à l'essai
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    Février 2014
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : Février 2014
    Messages : 11
    Points : 10
    Points
    10
    Par défaut Lancement d'une macro par un scan de code-barres
    Bonjour à tous,

    je bosse actuellement sur une petite application vba sur Excel 2010, dans laquelle j'aurais besoin de déclencher l'exécution d'une macro lorsque l'utilisateur scanne un code barre avec une douchette (plus exactement, je souhaiterais afficher un UserForm lorsqu'un code est scanné).
    Etant donné que la douchette est équivalente à un clavier, j'ai de gros doutes quant à la faisabilité de mon besoin
    Quelqu'un aurait-il une idée ?
    Merci d'avance pour vos précieuses réponses.

  2. #2
    Membre à l'essai
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    Février 2014
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : Février 2014
    Messages : 11
    Points : 10
    Points
    10
    Par défaut
    Re-bonjour à tous !
    finalement ce n'était pas compliqué du tout, j'ai trouvé la solution !
    Je vous la donne ici, au cas ou l'un d'entre vous chercherait à faire la même chose.

    J'ai tout simplement mis ceci à l'ouverture du classeur :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    Private Sub Workbook_Open()
        Application.OnKey "{%}", "AfficheUserform"
    End Sub
    Ce qui déclenche alors la procédure "AfficheUserform" à chaque pression sur la touche [%] du clavier.
    La procédure "AfficheUserform" affiche le UserForm1 et place le curseur dans la zone de texte "txtScan"
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    Sub AfficheUserform()
        With UserForm1
            .txtScan.SetFocus
            .Show
        End With
    End Sub
    Les informations renvoyées par la douchette étant les mêmes que celles renvoyées par un clavier, il m'a simplement suffit d'ajouter le caractère [%] au début de mon code-barres à scanner pour ouvrir le UserForm et saisir le contenu du code-barres dans la zone de texte.

    Merci tout de même d'avoir lu mon post.

    Bonne continuation à tout le monde.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2010] Lancement d'une macro par clic droit sur un bouton
    Par Thanatos2 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 09/04/2015, 22h55
  2. [XL-2007] Lancement d'une application par une macro vba
    Par rijks dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 06/12/2014, 09h12
  3. Lancement d'une macro par changement d'une cellule d'une autre feuille
    Par Jéro030691 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 03/12/2013, 12h48
  4. Démarrage d'une macro par SQL Server
    Par PiercingDegree dans le forum Requêtes et SQL.
    Réponses: 2
    Dernier message: 28/09/2005, 09h13
  5. Réponses: 2
    Dernier message: 22/07/2002, 12h13

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo