Problème avec Listbox

[Arnaud61]

Bonjour,

Alors voilà, j'ai différents userforms (x,y,z) qui renseignent un seul et même autre userform (a).

Les userforms x et y sont constitués de textbox. Le userform z est constitué d'une listbox dont les valeurs se trouvent dans une feuille caché.

Dans ce userform z j'ai mis en code:

Private Sub UserForm_Initialize()
ListBox_Priorité.List ()= Sheets("Variables").Range("K3,K6").Value
End Sub

Le userform s'affiche mais pas les valeurs.

J'affiche ce userform z à partir d'un bouton qui se trouve sur le userform y

Private Sub y_Click()
Unload y
z.Show
End Sub

Avez-vous une idée?

Merci

 

[Cousinhub]

Re : Problème avec Listbox

Bonjour Arnaud61, le forum

essaie plutôt ce code

Private Sub UserForm_Initialize()
ListBox_Priorité.List = Sheets("Variables").Range("K3:K6").Value
End Sub

 

[Arnaud61]

Re : Problème avec Listbox

Effectivement c'était bien cela.

J'étais persuadé d'avoir enlevé les ().

Merci

 

[Cousinhub]

Re : Problème avec Listbox

Re-,
ce n'était pas trop les parenthèses (d'ailleurs elles n'y étaient pas dans ton énoncé initial, il me semble), mais la définition des cellules

.Range("K3:K6").Value et non .Range("K3,K6").Value