Excel таблица в чертеже

[filat]

В чертеже вставлена таблица из файла Excel. Я вижу ее содержимое в объекте:
Dim oSheet As Sheet
oSheet.CustonTables
А вот где можно найти ссылку на файл Excel? И можно ли средствами API выполнить замену этой ссылки?

[Александр Ривилис]

Так как никто с Invent'оровцев не откликается, то я попробую вставить свои 5 копеек.
Я проанализировал методы CustomTable и ничего подобного на путь к Excel-файлу не нашёл. Есть свойство TableSource, позволяющее понять что исходник - файл Excel. Есть метод AddLink(string FullFileName), который (IMHO) позволяет указать какой файл будет связан с этой таблицей. Есть метод Update, который (IMHO) обновляет таблицу.
Чего я не могу проверить, так это нет ли пути к Excel-файлу в атрибутах (свойство AttributeSets) - вполне возможно, что один из атрибутов указывает на путь к файлу Excel.

Если ответ тебя не удовлетворил - могу отправить твой вопрос в ADN DevHelp.

[R.I.Chernov]

Никогда не вставлял в чертёж эксель, в 2013 таблица плохо отрисовывается. Не подскажете, как именно вы ее вставили? Быть может таблица есть в коллекции встроенных объектов?

[Александр Ривилис]

Вручную как-то так: http://www.cad.ru/ru/forum/?PAGE_NAME=read&FID=20&TID=7721
А программно - объект CustomTables.AddExcelTable(...)

[mikazakov]

А вот где можно найти ссылку на файл Excel?

Ну филат смотрим в
Document.ReferencedOLEFileDescriptors(1)
или по локальнее
Document.ActiveSheet.CustomTables(1).ReferencedOLEFileDescriptors
там все твои ссылки на посторонние файлы

И можно ли средствами API выполнить замену этой ссылки?

Не получится, можно только удалить старую таблицу и воткнуть новую:
CustomTables.AddExcelTable

[R.I.Chernov]

Ну филат смотрим в
Document.ReferencedOLEFileDescriptors(1)

Удобнее использовать ReferencedOLEFileDescriptors.ItemByName().

[mikazakov]

Удобнее использовать ReferencedOLEFileDescriptors.ItemByName().

У филата понятие "удобство при программировании" весьма своеобразное

[Александр Ривилис]

или по локальнее
Document.ActiveSheet.CustomTables(1).ReferencedOLEFileDescriptors
там все твои ссылки на посторонние файлы

Я нашёл у CustomTable свойство ReferencedDocumentDescriptor, но не нашёл ReferencedOLEFileDescriptors. Это у тебя опечатка или я не туда смотрел?

[mikazakov]

Это у тебя опечатка или я не туда смотрел?

Да я лепил ответ по хелпу уже ночью, видимо опечатался,
ReferencedOLEFileDescriptors - на уровне документа
ReferencedDocumentDescriptor - в CustomTable (Хэлп пишет: Property that returns either a DocumentDescriptor object (for Inventor references) or a FileDescriptor object (for foreign file references). The property returns Nothing if no links have been specified for the table.)

Но филат бы там мимо не прошел бы

[filat]

OLE - ссылка это вторичный элемент - его может и не быть. Если удалить ссылку в браузере чертежа, то таблица никуда не девается и связь с excel файлом сохраняется...
Замену, конечно, можно реализовать через удаление старой таблицы и AddExcelTable новой. Но для меня остается проблемой получения адреса таблицы, при отсутствии OLE - ссылки!?

[Александр Ривилис]

Но для меня остается проблемой получения адреса таблицы, при отсутствии OLE - ссылки!?

Что возвращает ReferencedDocumentDescriptor для  CustomTable такой таблицы?

[filat]

[Александр Ривилис]

Ага. Значит оно не пустое. Приведи это значение к FileDescriptor и получи при помощи метода FullFileName путь к файлу.

[Александр Ривилис]

Кстати, здесь: https://forums.autodesk.com/t5/inventor-customization/updating-custom-table-sources/td-p/4400941 и здесь: https://forums.autodesk.com/t5/inventor-customization/ilogic-change-excel-chart-loction/td-p/2838307 показано как можно заменить ссылку на excel-файл.

[filat]

Увы, но приведение к oDesc = CType(oCTable.ReferencedDocumentDescriptor, FileDescriptor) приводит к ошибке, при отсутствии OLE-ссылки.
Также не получается реализовать замену при отсутствующей OLE-ссылки.
Прийдется, наверное, всетаки реализовывать через удаление...