Fecha actual Dom, 22 Abr 2018, 16:03

Todos los horarios son UTC+02:00




Nuevo tema  Responder al tema  [ 3 mensajes ] 
Autor Mensaje
Desconectado
MensajePublicado: Lun, 20 Ene 2014, 19:27 

País: Argentina
Software de Corel que más utiliza: CorelDRAW Graphics Suite 2017
En esta seccion se podra crear macros para automatizar trabajos en Corel Draw.

Muchas veces necesitamos hacer algo en corel que es muy repetitivo, por Ej. Diseñar una tarjeta de 8 x 5 - 4/4 para mandar a offset. Para ello estaria buevo una macros que lo genere y no miles de archivos en corel.

Otro Ej. seria tenemos que crear las lineas de corte de tarjetas, o crear una plantilla de corte de calcos. etc.

Para ello es necesario esta seccion.

Con ello espero que mucha gente pueda optimizar su forma de trabajo y perder un poco el miedo a esto de programar, ya que no es muy complicado.

Y para aquellas personas con experiencia en el tema, compartar un poco de su conocimiento, poninedo sus MACROS, como link de descarga, obviameNte en formato *.gms.

Muchas gracias por leer esto.

PD: Estare publicando lo que aprendi de programacion en VBA para Corel, Macros, Link, Videos, etc.


Arriba
   
Desconectado
MensajePublicado: Lun, 20 Ene 2014, 21:14 

País: Argentina
Software de Corel que más utiliza: CorelDRAW Graphics Suite 2017
Estoy de nuevo este es una pequeña MACROS pero bastante util.

El Codigo es:

Sub TamañoObjeto()

If ActiveSelection.Shapes.Count = 0 Then Exit Sub

Dim unit As Long
Dim tUnit As String
Dim font As String
Dim fontSize As Single
Dim tSize As String
Dim precision As Long

Dim x As Double
Dim y As Double
Dim w As Double
Dim h As Double


unit = cdrMillimeter
tUnit = " mm"
font = "Arial"
fontSize = 24
precision = 1

ActiveDocument.unit = unit

ActiveSelection.GetBoundingBox x, y, w, h

tSize = Round(w, precision) & " x " & Round(h, precision) & tUnit

ActiveLayer.CreateArtisticText x, y - (1.6 * (fontSize / 4)), tSize, , , font, fontSize


End Sub

Le adjunto el archivo GMS. recuerden esta comprimidoen RAR, descomprimir e INSTALAR.

Saludos

PD: Para los que saben como instalarlo:
========================================
INSTALACION Y CONFIGURACION DE LA MACRO:
========================================
Copiar el archivo TamañoObjeto.gms pegarlo en la siguiente carpeta (en mi caso yo tengo Windows 8 y CorelDRAW X6 ) -----> C: Program Files (x86) -->CorelCorelDRAW Graphics SuiteX6 --> Draw --> GMS
Si tienen el corelDRAW abierto CERRAR EL PROGRAMA y volver a abrir. Por último para usar la MACRO en coreldrawX6 deberan ir a : Pestaña Herramientas --> Macros ---> Ejecutar Macro.


Adjuntos:
Comentario: Hasta la proxima
TamañoObjeto.rar [5.27 KiB]
Descargado 202 veces
Arriba
   
Desconectado
MensajePublicado: Lun, 27 Ene 2014, 19:01 

País: España
Software de Corel que más utiliza: CorelDRAW Graphics Suite X8
¿Qué es lo que hace exactamente este macro?


Arriba
   
Mostrar mensajes previos:  Ordenar por  
Nuevo tema  Responder al tema  [ 3 mensajes ] 

Todos los horarios son UTC+02:00


No puede abrir nuevos temas en este Foro
No puede responder a temas en este Foro
No puede editar sus mensajes en este Foro
No puede borrar sus mensajes en este Foro
No puede enviar adjuntos en este Foro

Buscar:
Ir a:  
cron

:: Corel-FORUM :: CORELCLUB.ORG ::

©1996-2018 Club Internacional de Usuarios de Corel - El punto de encuentro de los usuarios de Corel en la Red desde 1996 - 20 años de CORELCLUB!

Desarrollado por phpBB® Forum Software © phpBB Limited
Traducción al español por phpBB España
Registrarse