VBA Listbox

[mathijsderuiter]

In een listbox laad ik de waardes uit de cellen B2:B999.
Via cmdAdd voeg ik de selectie toe in activecell.
Nu is het de bedoeling dat wanneer de waarde uit B7 geselecteerd is in de listbox (bijvoorbeeld Martijn),
dat de waarde uit cel A7 wordt ingevuld in activecell.

Hoe doe ik dit?

Private Sub cmdAdd_Click()

       ActiveCell = txtArtikelNummer.Value
       ActiveCell.Offset(0, -1).Value = "1"

Unload Me

End Sub

 

[HSV]

ActiveCell = Cells(ListBox1.ListIndex + 2, 1)

 

[HSV]

Ik heb je profiel even bekeken, maar je reageert nergens meer als het goed is bevonden.
Markeer ze als opgelost, dan weten we dat in ieder geval.

Succes ermee.