Listbox selectie n.a.v. gekozen data

[SportBV]

Goedendag,

Ik ben bezig met een mutatieformulier van een sportvereniging. Hierin komen uiteindelijk alle leden van de vereniging in te staan. Er zit een userform in verwerkt om mutaties door te voeren. Dit userform kan o.a. geopend worden door te dubbel klikken op cel B3.

In het userform staat een listbox. Nou wil ik dat de listbox ook automatisch de juiste persoon selecteert. Wil ik namelijk wijzigingen doorvoeren dat moet er een selectie plaats vinden in de listbox zelf.

Ik heb een bestand toegevoegd waarin de situatie geschetst wordt. Stel ik klik op cel B3, dan opent het userform. Nou wil ik dat hij in de listbox automatisch ook de gegevens van Lid2 selecteert.

Zou iemand mij hier mee kunnen helpen? In de juiste richting kunnen wijzen.

Alvast bedankt

 

[VenA]

If ActiveCell.Row > 1 And ActiveCell.Row < ListBox1.ListCount + 2 Then ListBox1.ListIndex = ActiveCell.Row - 2

 

[gast0660]

Hier heb je een voorbeeld,daar zit alles in wat je nodig hebt.
Het zipje bevat een excelbestandje en een Map

 

[SportBV]

If ActiveCell.Row > 1 And ActiveCell.Row < ListBox1.ListCount + 2 Then ListBox1.ListIndex = ActiveCell.Row - 2

Dank u. Kunt u mij vertellen waar ik deze code moet plaatsen in het voorbeeld bestand?

 

[VenA]

In het Initialize gedeelte.

 

[SportBV]

In het Initialize gedeelte.

Hebbes. Dank u wel!

gast0660 ook bedankt. Kan veel bruikbare informatie uit het bestand halen!