Discussion :

[RussellD]

Bonjour à tous,

j'aimerais créer un UserForm avec une liste déroulante (ComboBox1) et 2 zone de text (TextBox1 et 2)
Il faudrait que les valeurs de ces TextBox dépendent de la valeur du ComboxBox1, à l'aide du fonction VLOOKUP qui cherche ds une base de données.
J'avais fait ça sur une feuille de calcul, cela fonctionnait, mais je n'arrive pas à l'appliquer à l'userform. Cela donnait quelquechose comme ça :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Worksheet_Change(ByVal Target As Range)
 
If Target.Address = "$C$4" Then
Application.Calculation = xlManual
Range("C7").Select
   ActiveCell.FormulaR1C1 = "=VLOOKUP(R4C3,TABLEAU,2,0)"
Range("C8").Select
    ActiveCell.FormulaR1C1 = "=VLOOKUP(R4C3,TABLEAU,3,0)"
Application.Calculation = xlAutomatic
Range("H5").Select
End If
End Sub

Le problème c'est que maintenant je ne me réfère plus à des cellules de la feuille, mais au combobox, et je n'arrive pas à l'ecrire efficacement.

Merci d'avance pour votre aide !

[sabzzz]

bonjour RussellD,

Code :

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

x = Application.VLookup(Me.ComboBox1, [TABLEAU], 2, 0)