Red de conocimiento informático - Material del sitio web - Cómo usar macros en coreldraw, dé un ejemplo específico. ¡Gracias!

Cómo usar macros en coreldraw, dé un ejemplo específico. ¡Gracias!

Sub Macro1()

'Este ejemplo es la escala de cien círculos

Dim i As Integer 'Define la variable i como un número entero

For i = 1 To 100 'Defina el rango de valores de i

ActiveLayer.Shapes(i).Stretch 0.5 'Duplica la proporción (el centro del círculo permanece sin cambios)

Siguiente 'Continuar

Fin Sub