VBA bouton FR ENG

Résolu/Fermé
Freemanban Messages postés 10 Date d'inscription mardi 22 juillet 2014 Statut Membre Dernière intervention 25 juillet 2014 - 22 juil. 2014 à 20:42
Freemanban Messages postés 10 Date d'inscription mardi 22 juillet 2014 Statut Membre Dernière intervention 25 juillet 2014 - 23 juil. 2014 à 17:57
Bonjour,
je suis novice avec VBA. j'aimerais savoir le code pour programmer 2 boutons. un premier qui affiche la version fracaise de mon formulaire et un deuxieme ma version anglaise.

Merci de m'aider


3 réponses

skk201 Messages postés 938 Date d'inscription jeudi 11 septembre 2008 Statut Membre Dernière intervention 16 octobre 2016 54
23 juil. 2014 à 11:17
Tout dépend comment tu as fais.

Est-ce que tu as 1 ou 2 USERFORM ?

Comment tu as différentié les deux langues ?
0
Freemanban Messages postés 10 Date d'inscription mardi 22 juillet 2014 Statut Membre Dernière intervention 25 juillet 2014
23 juil. 2014 à 15:43
j'ai essayé de t,envoyer l'image du USERFORM. j'èspere que tu l'as recu
0
Freemanban Messages postés 10 Date d'inscription mardi 22 juillet 2014 Statut Membre Dernière intervention 25 juillet 2014
23 juil. 2014 à 15:45


les 2 boutons concernés sont en haut à droite de l'image.
J'ai commencé à écrire quelque du genre tbNoir.caption = Black
0
skk201 Messages postés 938 Date d'inscription jeudi 11 septembre 2008 Statut Membre Dernière intervention 16 octobre 2016 54
23 juil. 2014 à 15:59
L'image est beaucoup trop petite j'arrive pas à voir.

Mais j'imagine que tu veux changer tout les label et mettre le texte en anglais ?
0
Freemanban Messages postés 10 Date d'inscription mardi 22 juillet 2014 Statut Membre Dernière intervention 25 juillet 2014
23 juil. 2014 à 16:16
c est exactement ce que j'aimerais faire
0
skk201 Messages postés 938 Date d'inscription jeudi 11 septembre 2008 Statut Membre Dernière intervention 16 octobre 2016 54
23 juil. 2014 à 16:25
Très simple à appliqué cet exemple à l'objet qui sert à changer de langue :

J'arrive pas à le voir sur l'image, mais j'ai imaginé que c'est un bouton ou c'est écrit le nom de la langue inverse ce celle en cours.

If BoutonLangue.Capition = "FR" Then
Label1.Caption = "January"
Label2.Caption = "February"
BoutonLangue.Capition = "EN"
Elseif BoutonLangue.Capition = "EN" Then
Label1.Caption = "Janvier"
Label2.Caption = "Février"
BoutonLangue.Capition = "FR"
End if


Tu vois comment faire ?
0
Freemanban Messages postés 10 Date d'inscription mardi 22 juillet 2014 Statut Membre Dernière intervention 25 juillet 2014
23 juil. 2014 à 16:29
C'est exactement ce que j'aimerait faire. Je te remerci beaucoup
Bonne journée
0
skk201 Messages postés 938 Date d'inscription jeudi 11 septembre 2008 Statut Membre Dernière intervention 16 octobre 2016 54
23 juil. 2014 à 16:41
De rien

oublie pas de mettre résolut
0