Discussion :

[db48752b]

Bonjour

Est il possible de faire un clavier ALPHABETIQUE Virtuel qui s'affiche a l'écran
pour la saisie d'un NOM dans un champ de formulaire ACCESS

J'ai un écran Tactile et pour un manque de place, je voudrai bien me passer du clavier de bureau

Merci d'avance

[micniv]

Bonsoir,
Si tu peux disposer d'un activeX ou de fonctions dans DLL utilisables pour Vb, il y une bonne probabilité que ça puisse marcher en VBA. Après, c'est à toi de jouer sous access, excel ...

[Heureux-oli]

A mon avis, on devrait pouvoir le faire à l'aide de code sous access sans passer par VB, VBA devrait suffire.
En dessinant le clavier et en associant un bouton pour chaque lettre.

[chappyporfaro]

Bonjour,

J'ai déjà eu un petit programme de clavier virtuel en .exe qui fonctionnait avec n'importe champ texte en autant que le focus soit dessus. Je ne l'ai plus mais peut-être en effectuant une petite recherche sur internet tu tomberais sur quelque chose de semblable. Avec ça, tu ne serait plus restreint qu'à Access.

Bye

[Invité]

Bonjour

Peut-être cela : http://access.developpez.com/faq/?page=TADivers#OSK

Starec

[amerex]

J'ai une belle idée très simple...

Crée un bouton d'action VBA, qui lance le Clavier Visuel de Windows

Code :

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

%SystemRoot%\system32\osk.exe

Démarrer > Tous les programmes > Accessoires > Accessibilité > Clavier Visuel.

[jpg75014]

Bonjour,

Je recherchais aussi la possibilité d'afficher un clavier visuel pour effectuer de la saisie sur des champs d'un formulaire Access (2007). la réponse de Philippe JOCHMANS me convient parfaitement...
... sauf que le clavier visuel est minuscule et je ne trouve pas d'option pour l'agrandir, ni dans Vista, ni par ACCESS.
Je voulais m'en servir pour un écran tactile et les touches sont trop petites (ou mes doigts trop gros).
Y a-t-il un moyen de l'agrandir ou existe-il un autre composant qui aurait des touches d'au moins 1 x 1 cm (voire 2).
Merci beaucoup pour votre aide.

[gwems]

j ai decider de créé mon propre clavier ainsi j' ai pu mettre la taille que je voulais

voila le secret :


déclare

Code :

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

Public gStr_Chaine As String

crée la fonction

Code :

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

1
2
3
4
 gStr_Chaine = gStr_Chaine & pStr_Chaine
    Me.Texte13.SetFocus
    Me.Texte13.Value = ""
    SendKeys gStr_Chaine

et apres pr chaque touche

Code :

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

1
2
3
Private Sub Commande31_Click() '****lettre F******
 EnvoiChaine "F"
End Sub

pour la touche suppression c est un peux différent

Code :

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

1
2
3
4
5
6
7
 If gStr_Chaine <> "" Then
gStr_Chaine = Mid(gStr_Chaine, 1, Len(gStr_Chaine) - 1)
Me.Texte13.SetFocus
SendKeys gStr_Chaine
Else
Me.Texte13 = ""
End If

et voila

[micniv]

Bonjour,

Vu et testé rapidement sur http://www.cvk.fr on trouve un clavier virtuel Arzety qui peut être aggrandi à volonté.

[audloi]

Bonjour

Je souhaiterai utiliser la méthode à Gwems

En utilisant Senkeys

J'arrive à utiliser son code mais quand je le mais en application :
J'appuie sur "1" il me marque 1 dans le champ
Je réappuie sur "1" il me marque 1 mais pas 11

Comment peut on faire pour saisir plusieurs caractères..?

PS: Désolé je suis novice dans le ce domaine...