[VBA]Listindex moet gelijk zijn aan andere listindex

[software]

Ik heb in Access 2 listboxen staan, ik selecteer in de eerste listbox een item. Nu wil ik als ik op een knop druk die andere listbox op dezelfde listindex.

ik heb geprobeert met list1.listindex = list2.listindex maar dit geeft fout :

fout 7777
you've use the listindex property incorrectly

Ik heb google gebruikt, mar ik weet niet echt welke keywords ik moet gebruiken. Ik heb geprobeerd met listbox en 2 listbox same listindex

Iemand een idee ??

[Verwijderd]

Volgens mij is het niet mogelijk tenzij je voor de 'missende' indexes een lege ruimte maakt ofzo.

als list1 bijv. een index heeft van 12 (dan staan er als het goed is al 13 indexes in list1, begint bij 0) dan moet je in list2 eerst listindex 0 t/m 11 maken om vervolgens de nummer 12 te kunnen maken.

[software]

in mijn eerste listbox heb ik staan (hidden)
PC001
pc002
pc003

2de heb ik staan
admin
testuser
user1

De hoeveelheid listindexs blijft altijd gelijk

[NMe]

Vragen over Access, VBA en andere Office gerelateerde zaken mogen in Officesuites en -software.

PW>>OFF

[Verwijderd]

Heb geen specifiek verstand van vba maar in vb zou ik het zo doen:

Visual Basic:

List2.List(List1.ListIndex) = List1.List(List1.ListIndex)

moet je wel iets geselecteerd hebben in list1 anders voegt ie een lege item toe, afijn errorchecks mag je zelf verzinnen

[software]

Verwijderd schreef op donderdag 28 juli 2005 @ 14:09:
Heb geen specifiek verstand van vba maar in vb zou ik het zo doen:

Visual Basic:

List2.List(List1.ListIndex) = List1.List(List1.ListIndex)

moet je wel iets geselecteerd hebben in list1 anders voegt ie een lege item toe, afijn errorchecks mag je zelf verzinnen

Bedankt voor de reply, maar VBA ondersteunt geen .list
Ik had ook ongeveer zo een oplossing, maar het werkt jammer genoeg niet.

[RayNbow]

Visual Basic:

List2.Selected(List1.ListIndex) = True

Verwijderd schreef op donderdag 28 juli 2005 @ 14:09:
Heb geen specifiek verstand van vba maar in vb zou ik het zo doen:

Visual Basic:

List2.List(List1.ListIndex) = List1.List(List1.ListIndex)

moet je wel iets geselecteerd hebben in list1 anders voegt ie een lege item toe, afijn errorchecks mag je zelf verzinnen

In Access VBA kent een ListBox de property List niet. Verder selecteert deze code geen item in List2, maar het verandert een item in List2.

[Verwijderd]

RayNbow schreef op donderdag 28 juli 2005 @ 14:15:

Visual Basic:

List2.Selected(List1.ListIndex) = True

[...]

In Access VBA kent een ListBox de property List niet. Verder selecteert deze code geen item in List2, maar het verandert een item in List2.

Ow vraag verkeerd begrepen

[Daos]

.listindex schijn je alleen te mogen lezen in oude versies van Access.

Probeer dit eens (bron):
list1.Value = list1.ItemData(list2.ListIndex)

[software]

RayNbow schreef op donderdag 28 juli 2005 @ 14:15:

Visual Basic:

List2.Selected(List1.ListIndex) = True

[...]

In Access VBA kent een ListBox de property List niet. Verder selecteert deze code geen item in List2, maar het verandert een item in List2.

Oke bedankt !!
dat was het !!!

[software]

ik heb nog een probleem
Nu wil de value van die 2de hidden listbox bekijken
ik doe string1 = list2.value
Maar nu krijg ik een NULL waarde ?

[ Voor 3% gewijzigd door software op 28-07-2005 15:48 . Reden: Typfoutjes ]

[RayNbow]

software schreef op donderdag 28 juli 2005 @ 15:47:
ik heb nog een probleem
Nu wil de value van die 2de hidden listbox bekijken
ik doe string1 = list2.value
Maar nu krijg ik een NULL waarde ?

Idd, net ff geprobeerd. De Value krijgt een waarde wanneer de gebruiker in de 2e listbox op een item klikt. Wanneer er een item geselecteerd wordt in de code, wordt de Value niet geupdatet.

Edit:
Ok, hiermee kan je een waarde uit een List ophalen:

Visual Basic:

List2.Column(0, List2.ListIndex)

[ Voor 12% gewijzigd door RayNbow op 28-07-2005 16:14 ]