Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Помогите создать макрос масштабирование

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки

Открыть новую тему     Написать ответ в эту тему

sashafedorov82

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Помогите создать блок масштабирование на VBA. Нужно выделить все объекты и увеличить их на 1000 с опорной точкой в начале координат. Я делал так:
Sub Test()
 Dim sset As AcadSelectionSet
 
  Set sset = ThisDrawing.SelectionSets.Add("SS1")
  ' Запрос объектов от пользователя, Enter - конец ввода
  sset.Select acSelectionSetAll
   ZoomExtents
   Dim basePoint(0 To 2) As Double
  Dim scalefactor As Double
  basePoint(0) = 0: basePoint(1) = 0: basePoint(2) = 0: scalefactor = 1000
  sset.ScaleEntity basePoint, scalefactor
  sset.Update
   
End Sub
 
Но выдает ошибку типа у объекта sset As AcadSelectionSet нет метода ScaleEntity, как быть?

Всего записей: 2 | Зарегистр. 23-10-2014 | Отправлено: 15:00 09-06-2016
NeoAnomaly

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
sashafedorov82, есть подозрение, что ScaleEntity необходимо вызывать на каждом объекте в отдельности. Нужно смотреть документацию AutoCad-a(это же про него, я правильно понял?) по скриптованию.

Всего записей: 418 | Зарегистр. 23-03-2010 | Отправлено: 16:03 09-06-2016
sashafedorov82

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Да это про AutoCAD.

Всего записей: 2 | Зарегистр. 23-10-2014 | Отправлено: 16:46 09-06-2016
Alexzzy

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
sashafedorov82
Погуглите.
Вот например http://forums.autodesk.com/t5/visual-basic-customization/scaleentity-error/td-p/356840

Всего записей: 1474 | Зарегистр. 10-07-2013 | Отправлено: 19:39 09-06-2016
Открыть новую тему     Написать ответ в эту тему

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Помогите создать макрос масштабирование


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru