Ik ben op het moment bezig met Access, en hier komt ook wat VBA bij kijken. Ik heb nu een probleem bij een ListBox, deze wordt gevult met waarden uit de database. Hier staat een CommandButton naast, als hier op geklikt wordt moeten de geselecteerde items verwijderd worden. Op google komt steeds de volgende code naar voren, maar de methode List() bestaat helemaal niet (in de regel met MsgBox ArtikelList.List(i) dus).
Uiteindelijk wil ik de waarde uit een kolom kunnen krijgen, hoe kan ik dit het beste doen?
code:
1
2
3
4
5
6
7
8
9
| Private Sub DeleteArtikel_Click()
Dim i As Integer
For i = 0 To ArtikelList.ListCount - 1
If ArtikelList.Selected(i) = True Then
MsgBox ArtikelList.List(i)
End If
Next i
End Sub |
Uiteindelijk wil ik de waarde uit een kolom kunnen krijgen, hoe kan ik dit het beste doen?