Discussion :

[impolitis]

Bonjour,

Une autre question.

Voilà, je gère un dictionnaire multilingue qui devient lourd et complexe du fait de l'utilisation de différents claviers (claviers de l'option de la barre des langues sous XP), qui peut être une source d'erreur.

Est-il possible par un code de sélectionner le clavier actif en fonction de la colonne où le curseur est positionné ? En clair, je voudrais :
Colonne B - clavier Français
Colonne C - clavier grec
etc.
(j'adapterai)

Merci pour votre aide.

[Philippe Tulliez]

Bonjour,
Je ne sais pas comment modifier le clavier en VBA mais le code qui intercepte la langue de la colonne où se trouve la cellule que tu souhaites modifier est le suivant.
Toujours à placer dans le même objet feuille (voir ta question d'un autre Post)
A adapter suivant les noms des langues que tu as mis en ligne 1

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Dim KeyBoardTxt$
 Select Case Cells(1, Target.Column)
  Case "Français"
    KeyBoardTxt = "Français"
  Case "Anglais"
    KeyBoardTxt = "Anglais"
  Case "Grec"
    KeyBoardTxt = "Grec"
  Case Else
 End Select
 MsgBox "Je change vers le clavier " & KeyBoardTxt
End Sub

Quand tu auras trouvé le code pour modifier le clavier. Tu devras le placer en lieu et place des lignes où se trouve KeyBoardTxt = "Langue"

[impolitis]

Merci.

Le code fonctionne.

Bon, je vais faire des recherches sur ce code de changement de clavier, mais le code opère également lors du déplacement du curseur à l'intérieur de la même colonne, ce qui m'est inutile.