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 :

[VBA-E] Probleme avec sendkeys


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Profil pro
    Inscrit en
    Février 2006
    Messages
    932
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 932
    Par défaut [VBA-E] Probleme avec sendkeys
    hello,

    j'aimerais creer différents signes que l'on obtient en appuyant sur alt et les chiffre du pavé numérique. par exemple alt+14 nous donne une note de musique.

    j'ai donc tenté (pour automatiser)

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.SendKeys "%1"
    mais je pense, comme j'a n'ai rien comme résultat..., qu'il me prend le 1 qui se trouve au dessus de la touche "A", non?

    comment faire pour simuler l'appui du "1" du pavé numérique?

  2. #2
    Membre chevronné Avatar de supernova
    Profil pro
    Développeur informatique
    Inscrit en
    Juillet 2005
    Messages
    447
    Détails du profil
    Informations personnelles :
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Juillet 2005
    Messages : 447
    Par défaut
    Salut,

    Teste la valeur de keycode sur un événement keyUp par exemple ; puis tu utilise la fonction asc pour passer le caractère.

  3. #3
    Membre éclairé
    Profil pro
    Inscrit en
    Février 2006
    Messages
    932
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 932
    Par défaut
    Oula... j'ai pas tout compris

    j'ai trouvé ca dans l'aide avec keycode

    constante : vbKeyNumpad1
    valeur : 0x61
    description : Touche 1
    lorsque je fait asc(1) j'ai 49 comme resultat mais c'est le meme pour le 1 du clavier et le 1 du pavé numérique alors je pense pas qu'on puisse utiliser ca...

  4. #4
    Expert confirmé Avatar de illight
    Homme Profil pro
    Analyste décisionnel
    Inscrit en
    Septembre 2005
    Messages
    2 344
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : France, Bas Rhin (Alsace)

    Informations professionnelles :
    Activité : Analyste décisionnel
    Secteur : Service public

    Informations forums :
    Inscription : Septembre 2005
    Messages : 2 344
    Par défaut
    C'est bizarre en écrivant ça :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Sub test()
    Dim s
    s = vbKeyNumpad1
    MsgBox (Chr(s))
    End Sub
    Dans ma msgbox j'ai la lettre a normalement je devrais avoir 1

    EDIT : si je met s = &H31 je trouve bien 1, mais je crois que c'est normal puisque je rentre le nombre en hexa en fait
    1. Avant de poster, et http://www.developpez.com/sources/
    2. Lors du post, n'oubliez pas, si besoin les balises CODE => voir ici pour l'utilisation
    3. N'oubliez pas le
    4. N'oubliez pas le si la réponse vous a été utile !

  5. #5
    Membre éclairé
    Profil pro
    Inscrit en
    Février 2006
    Messages
    932
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 932
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Debug.Print vbKeyNumpad1

    renvoie 97 (me demande pas pkoi !!)

    si tu ecrivais


    là ca irait

  6. #6
    Expert confirmé Avatar de illight
    Homme Profil pro
    Analyste décisionnel
    Inscrit en
    Septembre 2005
    Messages
    2 344
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : France, Bas Rhin (Alsace)

    Informations professionnelles :
    Activité : Analyste décisionnel
    Secteur : Service public

    Informations forums :
    Inscription : Septembre 2005
    Messages : 2 344
    Par défaut
    Citation Envoyé par Elstak
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Debug.Print vbKeyNumpad1

    renvoie 97 (me demande pas pkoi !!)

    si tu ecrivais


    là ca irait

    Parce que 97 c'est le code décimal en ascii de la lettre 'a'
    1. Avant de poster, et http://www.developpez.com/sources/
    2. Lors du post, n'oubliez pas, si besoin les balises CODE => voir ici pour l'utilisation
    3. N'oubliez pas le
    4. N'oubliez pas le si la réponse vous a été utile !

  7. #7
    Membre éclairé
    Profil pro
    Inscrit en
    Février 2006
    Messages
    932
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 932
    Par défaut
    mouarf je comprend toujours pas trop

    j'peux avoir une reponse sur ca?
    l'unicode c'est ce qu'on obtient avec alt gr?
    moi ce que je veux faire c'est juste obtenir ce qu'on fait en pressant alt+1 du pavé numérique ! (pas que alt+1 mais c'est l'exemple )

    d'ailleurs les symboles de ton image ouskel, je les obtient avec alt et non alt gr.... normal?

  8. #8
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    voir , XP menu démarrer/Programme/Accessoire/Outils systémes/table de caractéres

    ou démarrer/exécuter/ charmap.exe



    le caractére unicode 262B...

  9. #9
    Membre éclairé
    Profil pro
    Inscrit en
    Février 2006
    Messages
    932
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 932
    Par défaut
    Tiens donc !

    j'avais jamais vu cette petite table !!

    jvais jeter un oeil. merci

  10. #10
    Membre éclairé
    Profil pro
    Inscrit en
    Février 2006
    Messages
    932
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 932
    Par défaut
    Yop,

    c'est bon en fait je m'en sort avec cette table... je cherchais les raccourcis de certains caracteres et j'aurais voulu les lister mais là... le boulot est fait

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

Discussions similaires

  1. [VBA-E] Problème avec Sendkeys
    Par zoumzoum59 dans le forum Macros et VBA Excel
    Réponses: 7
    Dernier message: 31/05/2006, 21h02
  2. [VBA-E]Probleme avec la fonction Range
    Par pec dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 24/04/2006, 11h36
  3. [VBA-E] probleme avec la fonction countif
    Par adamm dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 18/02/2006, 09h23
  4. [VBA WORD] Probleme avec un .dot
    Par jagdjg dans le forum VBA Word
    Réponses: 6
    Dernier message: 18/01/2006, 11h07
  5. [VBA-E] problème avec le sendkeys
    Par darkpocket dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 23/02/2005, 14h25

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