Как получить property объекта на форме из другого файла?

[stiver]

Из макроса открываю другой xls-файл:

Workbooks.Open("пример.xls",,True)

в VB-проекте этого файла "пример.xls" есть форма Form1. У формы есть лабель Label1.

Как бы мне получить ее Caption?

Помогите пожалуйста!

[kuklp]

Дык так и мучать:
set wb=Workbooks.Open("пример.xls",,Tru e)
Упс... там только в режиме отладки увидите список доступных свойств. а к caption нужного обьекта только так и добираться.

[doober]

Part 2.
Или считать данные с VBA проекта

путь
wb.VBProject.VBComponents - item - Designer - Controls -item у него (Name,caption)

[stiver]

не получается..
VB проект в файле, который я программно открываю, запаролен.
Может в этом причина?

делаю так:

private sub commandbutton5_click()
Dim wb as workbook

   set wb=workbook.open("пример.xls",,True)

   msgbox wb.vbproject.vbcomponents.item(9).designer.controls.item(28).Caption

   wb.close

end sub

доходит до строки с msgbox и вылетает из процедуры... даже не закрывая файл

пробовал даже так:

private sub commandbutton5_click()
Dim wb as workbook

   set wb=workbook.open("пример.xls",,True)

   msgbox wb.vbproject.vbcomponents.item(9).name

   wb.close

end sub

при том, что девятый итем точно есть... результат такой же