• Kira
  • Восстановленный участник
  • На форуме с 20 февраля 2007г.
  • Сообщений: 7
  • Спасибо: 0

Тема: таблица excel в форме

Подскажите пожалуйста, можно ли средствами VBA внедрить таблицу excel в форму, чтобы пользователь самостоятельно выбрал значения из сложной таблицы?

  • Fatty
  • Восстановленный участник
  • На форуме с 30 мая 2006г.
  • Сообщений: 989
  • Спасибо: 2

Re: таблица excel в форме

> Kira
Добавь на форму
SpreadSheet Control
В режиме конструктора кликни правой клавишей
на окне форм ToolBox и выбери из списка
Microsof Office SpreadSheet 11.0 или 10.0
какой у тебя версии
См. Help по свойствам и методам этого
контрола (лучше это делать непосредственно
в Экселе)
~'J'~

  • Antonio
  • Восстановленный участник
  • На форуме с 7 декабря 2006г.
  • Сообщений: 44
  • Спасибо: 0

Re: таблица excel в форме

Вопрос в тему:
У меня установлен Офис 2007 и SpreadSheet отсутствует в списке дополнительных контролов. Он исчез когда я переустановил офис с 2003 на 2007.
Можно ли как-нибудь его вытащить?

  • Fatty
  • Восстановленный участник
  • На форуме с 30 мая 2006г.
  • Сообщений: 989
  • Спасибо: 2

Re: таблица excel в форме

> Antonio
У меня соответствующая DLL находится по адресу:
C:\Program Files\Common Files\Microsoft Shared\Web Components\11\1049
название OWCI11.dll (owci11.dll)
Попробуй найти у себя через Run->Search и зарегистрировать
см. поиском про регистрацию на этом форуме,
где-то подробно объяснялось
~'J'~

  • Antonio
  • Восстановленный участник
  • На форуме с 7 декабря 2006г.
  • Сообщений: 44
  • Спасибо: 0

Re: таблица excel в форме

У меня в папке Web Components сразу 1049 лежит, и библиотека поиском не нашлась =(

  • Fatty
  • Восстановленный участник
  • На форуме с 30 мая 2006г.
  • Сообщений: 989
  • Спасибо: 2

Re: таблица excel в форме

> Antonio
См. почту

  • Kira
  • Восстановленный участник
  • На форуме с 20 февраля 2007г.
  • Сообщений: 7
  • Спасибо: 0

Re: таблица excel в форме

Внедрить то объект я внедрила, только почему-то теперь не могу взять данные из экселовского фала.
  Set ExcelObject = GetObject "D:\Work\project\ACAD\tables.xls")
  Begin.TextBox1.Value = First.ExcelObject.Worksheets("Data").Range("d2", "d2").Value
Еще вчера работало, а теперь пишет "application defined or object defined error" на второй строке.
И что это может быть?