Gegevens wijzigen dmv Listbox

[Jack Nouws]

Hallo

Ik heb een UserForm en daarin staat een ComboBox die de gegevens op Blad2 eerst filterd en daarna in een ListBox plaatst.
Vraag: Is het mogelijk wanneer ik een item uit de Listbox selecteer, dat die gegevens in TextBoxen komen te staan, zodat ik hier gegevens kan wijzigen en weer opslaan?

Met vr gr
Jack

 

[danny147]

Beste Jack Nouws

14 dagen geleden is net hetzelfde gevraagd.

Zie bestandje.

Groetjes Danny. :thumb:

 

[Hoornvan]

Jack Nouws,

We zijn al een stapje verder.
Maak een keuze en selecteer dan een regel, zie het resultaat.

Nu de volgende stap nog maar dat kun je misschien wel zelf.

 

[Jack Nouws]

Beste Wim,

Bedankt voor je hulp en ik heb er nu dit van gemaakt.

Private Sub ListBox1_Click()

  If ListBox1.ListIndex > 0 Then
     TextBox1.Value = ListBox1.List(, 0)
     TextBox2.Value = ListBox1.List(, 2)
     TextBox3.Value = ListBox1.List(, 3)
     TextBox4.Value = ListBox1.List(, 4)
  End If

End Sub

De reden dat ik begin met If ListBox1.ListIndex > 0 Then
is,wanneer een listbox uit kolomkoppen bestaat wil ik hebben dat deze niet worden meegenomen in de code, anders was ik begonnen met If ListBox1.ListIndex > -1 Then
.
Zou je me nog kunnen helpen met een stukje VBA code die de info uit 3 textboxen vergelijkt, alvorens de rest te plaatsen?
Alvast hartelijk bedankt hiervoor. :thumb:

Met vr gr
Jack