ADN Club > VBA

Обсуждение видеоуроков AutoCAD VBA

(1/41) > >>

ediczr2012:
Добрый день.
При выполнении скрипта VBA  Вставка блока
Возникает ошибка:

Run-time error ‘-2147418113 (8000ffff)’
Automation error
Catastrophic failure


В чем причина ошибки ?

Алексей Кулик:
Для начала - текстом указать версию и разрядность AutoCAD. Далее - код в студию (и, возможно, проект). Также текстом описать место ошибки. Просматривать непонятные ролики на ресурсе, к которому у меня на работе заблокирован доступ, я не стану.
У меня в ACAD2009x64 (другой сейчас использовать не могу - это последняя версия, на которую у меня установлен VBA) прекрасно сработал код

--- Код - Visual Basic [Выбрать] ---Option Explicit Public Sub InsBlock()Dim blkRef as AcaBlockReferenceDim pt as VariantDim sName as String   sName = "testblock"  pt = ThisDrawing.Utility.GetPoint(, "Insertion point : ")  Set blkRef = ThisDrawing.ModelSpace.InsertBlock(pt, sName, 1, 1, 1, 0)End Sub

Максим Маркевич:
Алексей Кулик, я не на работе, посмотрел с ютубчика.
В общем, AutoCAD 2012 (разрядность не смог определить по видео :) ).
Код взят из поста #4 данной темы.

Текст ошибки:
Run-time error ‘-2147418113 (8000ffff)’
Automation error
Catastrophic failure
Ошибка в строке:

--- Код - Visual Basic [Выбрать] ---pp = ThisDrawing.Utility.GetPoint(, "Укажите точку вставки блока:")
Я не совсем понимаю, с чем она связана.

ediczr2012, напиши разрядность AutoCAD и прикрепи проект .dvb.

ediczr2012:
autoCAD 2012 разрядность 32 версия продукта F107.0.0 SP1

Алексей Кулик:
ediczr2012, задавай вопросы текстом, а не видеороликами.

Навигация

[0] Главная страница сообщений

[#] Следующая страница

Перейти к полной версии