Discussion :

[Elstak]

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?

[supernova]

Salut,

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

[Elstak]

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...

[illight]

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

[Elstak]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Debug.Print vbKeyNumpad1

renvoie 97 (me demande pas pkoi !!)

si tu ecrivais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

s = asc(vbKeyNumpad1)

là ca irait

[illight]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Debug.Print vbKeyNumpad1

renvoie 97 (me demande pas pkoi !!)

si tu ecrivais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

s = asc(vbKeyNumpad1)

là ca irait

Parce que 97 c'est le code décimal en ascii de la lettre 'a'

[Elstak]

hmm je sais pas

en tout cas j'ai dit une connerie

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Debug.Print Asc(vbKeyNumpad1)

ca donne 57 et chr(57) cest 9

au passage c'est quoi l'escii ? j'ai juste enetndu parler de l 'ascii

[SfJ5Rpw8]

voir du coté de l'unicode...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell=ChrW(9835)

[Elstak]

Oh jvais alors voir ca alors mon petit renard !

par contre là je comprend pas trop... j'ai eu excel 2003 et l'aide à l'air moins bien... deja en cliquant F1 il ne fait que donner l'aide pour le mot qui se trouve pres du curseur... sinon je vais cliquer sur le "?" mais là j'ai juste 1 champs pour mettre ma recherche.. cetait mieu avant, des qu'on remplissait un champs ca filtrait les resultats et je pouvais remplir un second champ et là ca refiltrait... y'a pas moyen de changer une option pour retrouver un truc similaire?
Pièce jointe 2953

j'ai ca pour le moment, sortez moi de là !!

[Elstak]

beurk c'est pas beau

y'aurai pas 2 fois le meme truc l'un en dessous de l'autre là par hasard?

l'unicode c'est avec alt gr?

mouarf je nage

(c'est pas hyper pressé ce truc pas d'affolement )


Edit : hmm, il a retiré son post entre temps le petit ouskel
Edit2 : oui il m'a dit aussi qu'il s'absentait jusque mercredi... il nous fait des fausses joies !!

[Elstak]

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?

[SfJ5Rpw8]

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...

[Elstak]

Tiens donc !

j'avais jamais vu cette petite table !!

jvais jeter un oeil. merci

[Elstak]

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