GDG Code Chunks, Discussion, VBA Snippets for CorelDRAW, Simple Macro Helpers!

cool vba macros for corel show cart gdg corel draw macros checkoutMyAccount corel macros
VBA Corel Macro Help
john's macros
thanks for stopping by gdg macros















Helpful VBA Code
New 2024 GDG Macro Suite Soon, 50% off upgrade discount code will be emailed to all those who bought suite 2023. New in this suite, several "B" versions of macros, for those having issues with macros running in systems with international decimal settings.
Previous message (5-15-2024): Hi, all. Sorry for any lack of communication lately. I have been extremely busy running my graphics and car audio shop. The days are long with little rest. I finally had a chance to see some of your emails and will see what I can do about CorelDraw 2024 macros. I haven't decided on an exact direction but may release mini-suites, or just the whole suite again with upgrade pricing. The best deal of course would be the purchase of the GDG Macro Suite.
Available now! GDG Macros Suite 2023.
Please note: Macros 2023 and above will no longer be sold separately.
Join me on Facebook to stay up to date with news, updates. Subscribe to my YouTube Channel for tutorial videos and tips. Need a custom macro? Contact me.
Not all macros are guaranteed to be continued due to compatibility reasons or other. Read new-version policy here.
I appreciate everyone! Upgrading macros and maintaining this site is quite a task for me. Want to contribute? Please DONATE
^ Hide these messages to save screen space ^

<<Back to helpful code list

Quick group and color your selection

Decription: This code will quickly group and color your selection. Select a shape or shapes and run. I use a keyboard shortcut. Handy for quickly grabbing all necessary items that may be sent to a machine.

Date: 2010-11-10 Author: John

Code:
Sub groupAndColor()
    Dim s As Shape
    Set s = ActiveSelection
    
    With s
    s.Fill.UniformColor.CMYKAssign 60, 0, 20, 20
    If s.Shapes.count > 1 Then
        .Group
    End If
    End With
    
End Sub


corel macros boost workflow
*Searches the FREE and Commercial Macros


CorelDraw macros for version 2023

CorelDraw macros for version 2020

CorelDraw macros for version 2019

CorelDraw macros for version 2018

CorelDraw macros for version 2017

macros for coreldraw x8

macros for coreldraw x7

macros for corel draw x6

macros for corel draw x6

FIND IT ON

find it on yahoo

FIND IT ON

find it on google