Zmiana indeksu w Combo Box

0

Witam,
mam pewien problem, którego nie mogę rozwiązać, a google nie dał mi żadnej celnej odpowiedzi.
Mam ComboBox z nazwami stanowisk. Jedno z nich to Monter (będę tego używał w dalszej wypowiedzi). Chcę wykonać pozornie prostą zmianę indeksu po wybraniu z listy odpowiedniego pracownika. Teraz tak:

  1. Mam listBox z pracownikami. Jedna z kolumn to "Stanowisko".
  2. Jak nacisnę edytowanie (poprzez button) to wyświetla informacje o zaznaczonym pracowniku w polach edycyjnych ...
  3. ... i próbuję też zmienić pole w Combo Box'ie - tu pojawia się problem

Próbowałem na wiele sposobów:

  1. nie ma czegoś takiego jak selectedIndex
  2. jak zrobię x.selected(3) = true (czyli że ma zaznaczyć 3 pozycję) nic się nie dzieje (najprawdopodobniej działa tylko dla listbox)
  3. nie udało mi się poprzez ItemData i **Value **(Value tylko zmienia treść, nie zmienia indeksu)
  4. Próbuję zrobić to poprzez DefaultValue i działa, ale:
  • działa jak podam wartość """Monter"""
  • jak podam listbox.column(6), wartość z kolumny 6 (czyli Monter), to wyświetla mi: #Name?
  • jak podam kolumnę z wartością liczbową to działa

Próbowałem podać zmienną w tych potrójnych cudzysłowach, ale nadal mam #Name?. Robiłem tak:

  • x.DefaultValue = listbox.column(6)
  • x.DefaultValue = """listbox.column(6)"""
  • x.DefaultValue = """ & listbox.column(6) & """
  • x.DefaultValue = "" & listbox.column(6) & ""
  • x.DefaultValue = "" & [listbox.column(6)] & ""
  • x.DefaultValue = "" & "listbox.column(6)" & ""
  • x.DefaultValue = "" & "[listbox.column(6)]" & ""

Efekt: albo tekst zawarty w """""", albo #Name?.

Nie potrafię sobie z tym poradzić. Większość języków ma x.selectedIndex i po sprawie, a tutaj nic.
Bardzo proszę o wszelką pomoc.

0

Witam,
znalazłem rozwiązanie. Wystarczy zrobić później:

DoCmd.Requery Me!comboBox.Name

lub

DoCmd.Requery Me!listBox.Name

Jeżeli ktoś ma inne rozwiązanie to proszę pisać

1 użytkowników online, w tym zalogowanych: 0, gości: 1