Мне нужно конвертировать более тысячи CAD-файлов в 3D-PDF-файлы.Файлы САПР являются файлами .cgr, и моя компания делает это с помощью 3DVIA Composer.Этот процесс легко выполнить вручную, я открываю файл .cgr в 3DVIA Composer и публикую его в PDF.Существует API 3DVIA Composer, и я нашел свойства и методы в Руководстве по программированию 3DVIA Composer - V6R2012x, доступном через приложение.Вот моя попытка программирования с помощью VBA:
Sub DViaComposerMacro()
Dim DViaComposer as Object
Set DViaComposer = GetObject("", "3DVIAComposer.Application")
DViaComposer.Show crViShow
DViaComposer.Open "filePath"
DViaComposer.Batch.3DOutputFormat = 131072
End Sub
Любое свойство, которое я пробовал, включая свойства Показать и Открыть, выдает ошибку времени выполнения '438' Объект не поддерживает это свойство илиметод.Я также получаю ошибку компиляции из-за .3D в строке DViaComposer.Batch.3DOutputFormat = 131072.
Я не нашел в Интернете никаких примеров кодов для 3DVIAComposer, и единственная помощь, которая у меня есть, - это Руководство по программированию.