Warning
MillMage is in active development and in a prerelease state. Many operations and functions are not feature complete. Please report any unexpected behavior by searching for and reporting the issue or question in the MillMage Beta User Forum. Please include screenshots and as much detail as possible.
Beta Users: Finding Help
Find help and download the latest release candidate of MillMage in the MillMage Beta User Forum.
Users new to MillMage should follow the Getting Started guide.
Warning
This documentation is in active development and in a prerelease state. These documents are not complete and may include missing pages, broken links, and placeholders. Content is being updated as feedback is reviewed. Your patience is appreciated.
CorelDraw Macro Setup¶
MillMage offers CorelDRAW users on Windows an optional macro to simplify and speed up the process of sending work to MillMage directly through CorelDRAW.
Note
macOS users can Export work out of CorelDRAW as an .AI or an .SVG file and Import into MillMage.
Installation¶
- Make sure MillMage and CorelDRAW are both installed on the same computer.
- Open the MillMage install folder, typically located at
C:\Program Files\MillMage
. Find theExportToMillMage.gms
file inside this MillMage folder. -
Copy the
ExportToMillMage.gms
file by right-clicking and choosing Copy or by pressing Ctrl+C. -
Open the CorelDRAW install folder, typically found at
c:\Program Files\Corel
. Locate the folder calledCorelDRAW Graphics Suite ###
orCorelDRAW Technical Suite ###
, with###
being your CorelDRAW program version number. - Open the
CorelDRAW Technical Suite ###
folder, with###
being your CorelDRAW program version number, theDraw
folder, and finally theGMS
folder. Paste theExportToMillMage.gms
file copied earlier into thisGMS
folder. -
Grant permission to copy into the
GMS
folder if prompted.
Loading the Macro¶
- Open CorelDRAW.
-
Open the Script Manager (Macro Manager on older versions) by going to Tools → Scripts → Scripts or by using Alt+Shift+F11. Older versions can open the Macro Manager by selecting Tools → Macros → Macros Manager.
-
If the ExportToMillMage macro doesn't show up in the Visual Basic For Applications category, load it manually.
A. Right-click on the background of the Script Manager window, select Load Macro Project, and select
ExportToMillMage.gms
from CorelDRAW's GMS folder (located earlier in this guide).
Configuration¶
- Open CorelDRAW's customization window from Tools → Options → Customizations. On older versions select Tools → Customizations.
- Open the Commands section on the left. On older versions, select Workspace → Customization → Commands.
- Select Macros from the pane that appears on the right.
- Select the MillMage entry.
- Click on the Browse button next to the icon. On older versions, select the Appearance tab to select an icon.
- Select the MillMage icon found in the
C:\Program Files\MillMage
folder and click Open. - Grab the macro from the customization window and drag it to a toolbar for an easier workflow in the future.
- Set the caption to
Export to MillMage
. -
Click OK to close the Script/Macro Manager window.
Using the Export to MillMage Macro¶
Click the Export to MillMage macro button to launch MillMage with your current selection from CorelDRAW loaded in your Workspace. If nothing is currently selected, the entire file will load instead.
Troubleshooting¶
Advanced Users: Corel Export Script Source
A source copy of the script called in the ExportToMillMage.gms
file, can be found in the CorelExportScript.txt
file.
Code
' MillMage CorelDraw exporter / launcher
' Thanks to Casey Gadd for the original version
Sub MillMage()
Dim answer As Integer
Dim OrigSelection As ShapeRange
Set OrigSelection = ActiveSelectionRange
OrigSelection.CreateSelection
Dim expopt As StructExportOptions
Set expopt = CreateStructExportOptions
expopt.UseColorProfile = True
Dim expflt As ExportFilter
Dim outputFile As String
outputFile = "C:" & Environ("HOMEPATH") & "\MMExport.ai"
If Len(Dir$(outputFile)) > 0 Then
Kill (outputFile)
End If
'Is anything selected?
answer = vbYes ' Assume success
If ActiveSelectionRange.Count = 0 Then
'Export everything if there's no selection
Set expflt = ActiveDocument.ExportEx(outputFile, cdrAI, cdrAllPages, expopt)
Else
Set expflt = ActiveDocument.ExportEx(outputFile, cdrAI, cdrSelection, expopt)
End If
If answer = vbYes Then
With expflt
.Version = 10 ' FilterAILib.aiVersionCS6
.TextAsCurves = True
.PreserveTransparency = True
.ConvertSpotColors = False
.SimulateOutlines = False
.SimulateFills = False
.IncludePlacedImages = True
.IncludePreview = True
.EmbedColorProfile = False
.Finish
End With
Dim appLocation As String
appLocation = Environ("ProgramFiles") & "\MillMage\SendUDP.exe "
If Len(Dir$(appLocation)) = 0 Then
appLocation = "C:\Program Files\MillMage\SendUDP.exe "
End If
Call Shell(appLocation & """" & outputFile & """", vbHide)
End If
End Sub
Related Topics¶
For more help using MillMage, please visit our forum to talk with MillMage staff and users, or email support.