Что такое макросы и как написать самый простой. Специально для канала @CorelRussia Код макроса из видео: Sub Macro3() Dim vasia As Shape Dim dyrka As Shape ActiveDocument.Unit = cdrMillimeter xx = ActiveWindow.ActiveView.OriginX yy = ActiveWindow.ActiveView.OriginY rect_size = 200 radius = 5 zazor = 3 Set vasia = ActiveLayer.CreateRectangle(xx - rect_size / 2, yy + rect_size / 2, xx + rect_size / 2, yy - rect_size / 2) Set dyrka1 = ActiveLayer.CreateEllipse2(vasia.LeftX + zazor + radius, vasia.TopY - zazor - radius, radius, radius) Set dyrka2 = ActiveLayer.CreateEllipse2(vasia.RightX - zazor - radius, vasia.TopY - zazor - radius, radius, radius) Set dyrka3 = ActiveLayer.CreateEllipse2(vasia.LeftX + zazor + radius, vasia.BottomY + zazor + radius, radius, radius) Set dyrka4 = ActiveLayer.CreateEllipse2(vasia.RightX - zazor - radius, vasia.BottomY + zazor + radius, radius, radius) End Sub @WinLaserStanki :
Поддержи проект Деревяшкина и получи эксклюзивную панель макросов! в Телеграме:
на Бусти:
на Патреоне: / mrwoodman Видео про полную панель с генератором коробок: • Панель макросов 2.6. Сдвигающаяся кры... Бесплатная мини панель:
Сообщество джедаев в телеграм:
Новостной канал Вестник джедая:
Канал Рафаэля Шарапова / 4el0bek Полезные видео: Стрим по горячим клавишам: • Горячие клавиши или Hotkeys стандартн... Полезности от WinLaser: Генераторы и конструкторы коробок:
Генераторы шестеренок и цепей:
(платный)
Список групп с макетами https://vk.com/laser_m51
https://vk.com/maket_cdr_dxf_eps
https://vk.com/dxf_band
https://vk.com/tverlogo
https://vk.com/pantry_cdr
https://vk.com/picassodecor3
https://vk.com/young_technician_shop
https://vk.com/aismaket
https://vk.com/club89684573
https://vk.com/lazehelp
https://vk.com/public173109472
https://vk.com/maketlazer
https://vk.com/maketlaser
Фанеру в Беларуси покупаю
Донат на стриме: https://www.donationalerts.com/r/mrwo...
в ВК: https://vk.com/app5727453_-91564008
Ищите нас так же в сети https://vk.com/dukered
(личный) https://vk.com/laser_man
(группа) / laserman_minsk
