Userform à renseigner en fonction de 2 variables

[Oldevi]

Bonjour à tous,

Je suis en train de créer un formulaire. Je voudrais renseigner mes textbox en fonction de 2 variables.
J'ai 2 onglets, un avec des données en français et l'autre en anglais.
Dans chacun de ces onglets des données sont renseignées en fonction des utilisateurs.

J'arrive à renseigner les textbox en fonction des utilisateurs. Je voudrais que la macro aille cherche les données dans l'onglet correspondant. Ca marche dans le Userform Initialize mais pas dans le Nom_change. Quelqu'un a t'il une idée pour m'aider ? Merci beaucoup d'avance !

Private Sub Userform_Initialize()

Me.langue.AddItem "Français"
Me.langue.AddItem "Anglais"

Dim S As String
S = langue.Value

With Sheets(S)
For Each cell In .Range("A2:A" & .Range("A65536").End(xlUp).Row)
Me.nom.AddItem (cell)
Next
End With

End Sub

Private Sub Nom_Change()
Dim I As Byte
With Sheets(S)
For I = 2 To 21
Me("Box" & I) = .Cells(Me.nom.ListIndex + 2, I)
Next I
End With
End Sub

 

[Oldevi]

Re : Userform à renseigner en fonction de 2 variables

J'ai trouvé il suffit de mettre S = langue.value dans chaque sub