Стрим: Пишем макрос для Corel Draw. Основы программирования на VBA

Стрим при поддержки компании MCLaser Текст макросов Sub rotate_90PO() -90# End Sub Sub rotate_90PR() 90# End Sub Sub rotate_180() 180# End Sub Sub attach_left() attach (“left“) End Sub Sub attach_right() attach (“right“) End Sub Sub attach_top() attach (“top“) End Sub Sub attach_bottom() attach (“bottom“) End Sub Private Sub attach(side) Set OS = Set fir = For Each s In OS If Not s Is fir Then Select Case side Case “right“: = Case “left“: = Case “top“: =