Discussion :

[ThSPB]

Bonjour,
J'essaye de donner une utilisation multilingue à mon fichier. Peut on modifier le texte dans les différents éléments d'un Userform.
Bouton
Label
Frame
etc...
La langue source se situe sur une feuille "Langue"

[Theze]

Bonsoir,

au chargement de ta Form :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Private Sub UserForm_Initialize()
 
    With Worksheets("Feuil1")
 
        Me.Label1.Caption = .Range("A1")
        Me.Frame1.Caption = .Range("A2")
        Me.CheckBox1.Caption = .Range("A3")
        'etc...
 
    End With
 
End Sub

Il te faut bien sûr faire un test du language à charger (Français en colonne A, Anglais en colonne B, etc...)

Hervé.

[ThSPB]

Ca marche très bien

Thierry