Możliwy duplikat:
Dodawanie elementów w polu listy z wieloma kolumnami

Z MFC VC ++ istnieją dwie kontrolki,ListBox iListCtrl. Ale z VBA wydaje się, że mamy tylkoListBox.

Chcę utworzyć listbox z 2 kolumnami (Company_ID, Company_Name).

Oto, co próbowałem:

Stworzyłem lstbox (typ kontrolny ListBox)Typ źródła wiersza = lista wartościBiorę wartość od użytkownika z dwóch pól edycyjnych, a gdy użytkownik kliknie „dodaj”, należy go dodać do listy z 2 kolumnami.

W procedurze kodu VBA dodałem następujące wiersze:

lstbox.ColumnCount = 2
lstbox.AddItem (Company_ID)

Poniższy kod nie działa, co wydaje się być związane z dodawaniem wartości kolumny:

lstbox.Column(1,lstbox.ListCount - 1) = Company_name

Daje to błąd:

Wymagany obiekt czasu wykonania „424”.

Czy ktokolwiek mógłby pomóc w dodaniu kodu vba do listy kolumnowej.