Listbox

[Pups]

Здраствуйте у меня такая проблемка. Я создаю диалог в excel на нем помещаю listbox, но когда я бытаюсь заполнить его у меня выдается ошибка, object doesn't support this property or metod.
Записывать пытаюсь так DialogSheets("workarchiv").ListBox(1).List(1)="hello"

[GSerg]

Это он контрол найти не может. ListBox - это не коллекция. К контролам на листе нужно обращаться через Shapes("Name") (это если контрол с панели инструментов "Формы") или прямо по имени (если с панели инструментов "Элементы управления"). Во втором случае контрол будет доступен в списке объектов модуля класса листа, на котором расположен.

[Pups]

Простите возможно я не понял ответа я не большой в специалис в VBA, но когда я создаю на том же диалоге OptionButtons и пытаюсь менять его значение таким образом DialogSheets("workarchiv").OptionButtons(1).Value = 1 то все работает, также получается обращаться к etitboxes. Простите если я чего то не допонимаю

[GSerg]

Чёрт, простегал.
Свойства у листа есть, просто они скрыты.
В данном случае это проперть ListBoxes(i)

[Vitaly1]

наверно так:

Код: Выделить всё

'очистка
DialogSheets("workarchiv").ListBox(1).clear
'добавление строки тексьа
DialogSheets("workarchiv").ListBox(1).additem "Hello"

возможно, ты в несуществующую ячеййку обращаешься.


может быть еще и так, а то я никогда не слышал, что б в VBA массив элементов был:

Код: Выделить всё

'очистка
DialogSheets("workarchiv").ListBox1.clear
'добавление строки тексьа
DialogSheets("workarchiv").ListBox1.additem "Hello"

[Pups]

Спосибо ребята, но мне завтра здавать её пришлось сделать через userform, но все равно большое спосибо и кстати так каквы говорите все равно не работает. Премного благодорю