Page 1 sur 1

Vider un tableau nomme ou listBox

Posté : 19 février 2014, 01:33
par CAPUCIN
Bonsoir a tous, lorsque j'ouvre mon UserForm, j'aimerais que son listBox soit vide. Hors il est associe a un tableau nomme. J'ai essayer de vider le tableau nomme avec Range("Occurences_2").Clear mais il ne s'est pas vider. Avez-vous une idee?
Private Sub UserForm6_Initialize()
Range("Occurences_2").Clear
UserForm6.ListBox1.list() = Sheets("ASS").Range("Occurences_2") ' le listBox reflete en temps reel le contenu du tableau "Occurences_2"
ListBox1.SetFocus  'Met le focus sur la ComboBox.
  
End Sub

Re: Vider un tableau nomme ou listBox

Posté : 19 février 2014, 01:57
par Banzai64
Bonjour

Ta procédure doit s'appeler seulement Userform_Initialize (sans le 6 à la fin de Userform)

En plus si tu veux que la ListBox reflète le contenu de la plage nommée il faut utiliser la propriété RowSource
Private Sub UserForm_Initialize()
  Range("Occurences_2").Clear
  Me.ListBox1.RowSource = Sheets("ASS").Range("Occurences_2").Address ' le listBox reflete en temps reel le contenu du tableau "Occurences_2"
  ListBox1.SetFocus  'Met le focus sur la ComboBox.
End Sub

Re: Vider un tableau nomme ou listBox

Posté : 19 février 2014, 04:36
par CAPUCIN
Rebonjour Banzai!
j'ai remarque que j'avais deja le tableau Occuurences de mis dans la propriete Row Source. Si je comprend bien on peut le mettre a la main, ou employe du VBA pour le faire?

Re: Vider un tableau nomme ou listBox

Posté : 19 février 2014, 11:49
par Banzai64
Bonjour

Tu comprends bien

Re: Vider un tableau nomme ou listBox

Posté : 19 février 2014, 17:08
par CAPUCIN
Merci Banzai et continu ton bon travail!

Capucin