CorelDRAW X5 :: Getting Macro To Run From Excel?
Jun 1, 2011
I have a VB script that I created in excel that does a number of things. At some point I want it to open a series of variable Draw documents based on names and paths from columns in an excel document. This part works fine. However, I also want to perform a macro, created in CorelDraw, on said files once opened. This macro also works fine. The issue I am having is getting Excel to tell Draw to run the macro. I wrote the line with the same syntax I would use for telling excel to run a Word macro. IDK.
Set CorelDrawApp = CreateObject("CorelDraw.Application.15")
CorelDrawApp.Visible = True
Dim i As Long
[Code]....
View 8 Replies
ADVERTISEMENT
May 23, 2012
After starting my previous thread "What formula will work to achieve this result" I decided to post this new thread because I have changed my mind and will now be using the external Excel file that the "Extract Data" creates to do my calculations.
Here's what I would like to do: create a Macro [button] in Excel with the following conditions:
*
Sample of excel spreadsheet:
*
MANUF NoSUB No.DESCRIPTION** UNIT QUANTITY
A123494456TYPE A, XXXX XXX * * * * EA** * * * 45
A423520374YA1AM, XXXXXXXXXX * **EA** * * * 55
A148231375TYPE B, XXXXXXXXX * * * EA** * * * 33
A146151725A1AAM, XXXXXXXXXX * * EA** * * * 67
A135621873TYPE A, XXXXXXXXX * * * EA** * * * 24
1. * * * CONDITION #1:
IF "DESCRIPTION" TAB ["C" COLUMN] CONTAINS "TYPE A" AS PART OF TEXT/DESCRIPTION, TAKE THE "QUANTITY" TAB ["E" COLUMN] SPECIFIED ON THAT PARTICULAR ROW AND DIVIDE IT BY 20, ROUNDED UP TO NEAREST ONE.*
2. * * * CONDITION #2:
IF "DESCRIPTION" ["C" COLUMN] CONTAINS "TYPE B" AS PART OF TEXT/DESCRIPTION, TAKE THE "QUANTITY" SPECIFIED ON THAT PARTICULAR ROW ["E" COLUMN] AND DIVIDE IT BY 10, ROUNDED UP TO NEAREST ONE.
3. * * * AUTOMATICALLY SAVE THE EXCEL FILE AFTER THIS MACRO HAS BEEN UTILIZED.
View 4 Replies
View Related
Nov 10, 2012
i want to call an excel macro from a lisp. is it possible?
now i have this:
(startapp "C:\Program Files (x86)\Microsoft Office\Office12\Excel.exe"
(strcat """
(getvar 'dwgprefix)
(vl-filename-base (getvar 'dwgname))
"XXX.xls""
)
)
i just want it to run macro1 from book1.xls
View 2 Replies
View Related
Jun 14, 2013
I am looking for an example excel macro to zoom to an object given the obect entities handle.
View 2 Replies
View Related
Jul 4, 2013
How to run a macro through all the pages at a single instance in a malty page document.
View 3 Replies
View Related
Jun 30, 2007
TransformEach.gms
This is a macro I've been working on for a few days, what it does is it applies the selected transformation to each one of the selected objects individually. It rotates, scales and flips in both axes. I think this is a simple but useful workaround to the fact that Corel doesn't have a native command that does this.
[URL]....
View 9 Replies
View Related
Mar 4, 2011
I work in a trophy shop running laser engravers. I'm looking for a macro that would select everything on a page, flip it vertically, and do so throughout a multi-page document - I just had to do that manually for an order of 236 acrylics (all in one multi-page file!) and it - well - was a bit tedious I can make a macro to select all and flip - but I'm lost when it comes to getting it done throughout a file, I can only get it to do that a page at a time.
View 14 Replies
View Related
Mar 18, 2011
SanM_ExportToJPG.zip
A few days ago I remembered about my old macro Export To JPG, and I updated this one for CorelDRAW X5. This is not perfect macro.
Macros and tools for CorelDRAW @cdrpro_ru
View 4 Replies
View Related
Sep 19, 2013
I have downloaded a Free vector (.cdr) file which was designed using RGB color. This files has 100's of objects that are in color with RGB..
Is there a way to convert the RGB color's to cmyk without having to do each one by hand?
Maybe some kind of "Macro?
I need to do this because I am going to have this design printed on a T-Shirt and the printer uses "CMYK 4-Color Process" for their printing.
View 5 Replies
View Related
Jul 31, 2013
so I've recorded a macro to find all drop shadows and seperate them from whatever they're attached to. Now my problems is how to deselect the objects leaving just the drop shadows selected
Sub Macro173()
ActiveDocument.CreateShapeRangeFromArray(ActiveLayer.Shapes(3), '
ActiveLayer.Shapes(1)).Cut ActiveLayer.Paste Dim Paste1 As ShapeRange
Set Paste1 = ActiveSelectionRange
ActiveDocument.Undo
ActiveDocument.Undo
ActivePage.Shapes.All.CreateSelection
ActiveSelection.Separate
End Sub
View 7 Replies
View Related
Apr 17, 2012
Macro or vba code to change art and frameText in draw x5. Some resoruces to learn beginners coding ?
View 5 Replies
View Related
Nov 15, 2012
I am looking for a macro to export EPS files to a designated folder.
select ability to export a number of pages in one hit.
ability to add the page name, file path as an eps naming convention (saves me renaming).
set the character allowed in in the filename.
View 1 Replies
View Related
Feb 12, 2013
I want to take the current document, convert to PDF using a profile I have saved, then create a new email message in Microsoft Outlook, attach the PDF that saw just created, and use the file name as the subject of the email (minus the file extension).
Bonus points for also selecting a signature that I have in Outlook. I know the PDF creation can happen, and I know I can save the file name to be passed on, but can I access Outlook from CorelDraw?
Current System: i3 3.07ghz, 3gb ram, Windows 7 32 bit with all updates and X6
View 14 Replies
View Related
Jan 7, 2013
Draw a rectangle. Record macro
use the interactive contour to create an inline. Cntrl+k (break apart). It works but leaves both selected. Now what I need it to do is deselect the outer rectangle leaving me with just the inner one still selected.
View 8 Replies
View Related
Jan 2, 2013
I have a macro that saves a file to a temp directory. Is it possible to use a macro to just "copy" that file to the clipboard and stop? I just want it available in the cliboard so I can navigate to where I want it then paste it. I then rename it. The directory will always be different as will the file name.
View 6 Replies
View Related
Apr 22, 2013
I have created a macro that create company logo and file name path to all page.
But when document page is more than about 10-15 or more macro stops responding and coreldraw x6 hangs.
View 1 Replies
View Related
May 17, 2012
I am working on creating a macro we can save with a template to ready the designed art for print. So the designer can create the design, run this macro and export a PDF. The macro needs to:
1. Turn off template layer.2. Select all objects layer 1.3. Group all objects layer 1.4. Rotate -90 degrees.5. Set layout to landscape.I have everything working except the Select all "Objects Part". the macro will only select objects that are there during the creation of the macro, and not select the designed work.
Is there anyway to just add a keystroke of "Ctrl+A" to the macro?
Here is the macro i got:
____________________________________________________________________
Sub Adstand_Rotate() ' Recorded 5/17/2012 ActivePage.Layers("Template").Visible = False Dim s1 As Shape Set s1 = ActiveLayer.CreateRectangle(0#, 70#, 39.75, 0#) s1.Fill.ApplyNoFill s1.Outline.SetProperties 0.006945, OutlineStyles(0), CreateCMYKColor(0, 0, 0, 100), ArrowHeads(0), ArrowHeads(0), cdrFalse, cdrFalse, cdrOutlineButtLineCaps, cdrOutlineMiterLineJoin, 0#, 100, MiterLimit:=45# s1.Outline.SetNoOutline s1.Rotate -90# Windows.FindWindow("C:Documents and SettingsdreesdmDesktopAd Stand Template.cdr").ActiveView.SetViewPoint 35#, 19.875, 100 With ActiveDocument.MasterPage .SetSize 39.75, 70# .Orientation = cdrLandscape .PrintExportBackground = True .Bleed = 0# .Background = cdrPageBackgroundNone End WithEnd Sub
____________________________________________________________________
View 3 Replies
View Related
May 22, 2013
Is this something easy I can do? Have my Macro Auto Open Upon Start Up?
Okay, so the simple macro i have been working on isnt just for personal use. We will use this macro all day long - but the issue is - my coworkers im sharing the macro with would prefer the macro open when program opens.
Now that i had set the macro's position down - how do i got about having the macro auto open upone start up.
View 6 Replies
View Related
Nov 13, 2013
trying to write a macro to open to a specified directory.
SendKeys "^(o)"
SendKeys "\G-SERVERCorel Draw files
SendKeys"{ENTER}"
Problem is that it doesn't type the text exactly as given. Randomly drops off the first few characters.Because hitting open defaults to the libraries instead of my server where the files are located.
When you hit open the cursor is already in the "File name:" field so if I just type the directory there and hit enter it takes me to that directory. Sure would be nice to just have it type that for me and enter. Had it working great for a few times but aftaerr navigating around for a bit it drops off those characters.
View 9 Replies
View Related
Apr 10, 2011
I have tried to use the Macro recorder to record the keystrokes as I get the dimensions from the top of the rectangle to each line of text & from the edge of the triangle to each line of text. Unfortunately the recorder could not record.
Is it possible to design a macro which can be used to get the dimensions as required ?
View 1 Replies
View Related
Oct 20, 2008
How to develop an auto dimensioning macro for CorelDraw x3. I have seen this feature built in to FlexiSign Pro. This macro would save so much time and work with consistency!!! Is it doable?
View 14 Replies
View Related
Apr 4, 2012
need a macro code that will select all objects that I've named "X" then delete them. Tried recording but it only works for the one object and not all of the same name
View 8 Replies
View Related
Dec 20, 2012
I create macro button for two circles.if we click that button a guidelines create the center of both these circles. i have new in coreldraw VBA.
View 2 Replies
View Related
May 9, 2010
Re: CorelDraw X4
Windows 7 x64
Installation of Office 2010 breaks the RecentFiles macro, so uninstalling it is now necessary. I would have thought that removing recentfiles.gms from Draw's GMS folder would be sufficient. However, this actions leaves a VBA error message when Draw launches:
"Object library invalid or contains references to object definitions that could not be found".
View 4 Replies
View Related
Dec 28, 2012
Need a macro to copy a specific file and then promp where to paste the file. Trying to make a macro to Publish to PDF with certain parameters, mainly the security password, then save to as file "X". Then Call macro to copy file "X" so I can navigate to the proper directory,paste it and rename it.
If Corel had a feature that would allow you to set your password once and it would remember it so you didn't have to retype it every time.
I did managed to Record completely the macro but it will only save over the same file every time. It would work great if I could get it to just go back to the "publish To PDF" after inputting the settings then I can name it and put it in the directory I want.
View 2 Replies
View Related
Jul 19, 2011
Is there maybe a macro for styles (either text or graphics) that
1. connects objects assigned with a style, to that style LIVE? eg, altering the style properties, automatically all objects assigned with that style will adopt those changes too,
2. offers LOT more configuration options than the current default CorelDraw styles options
View 1 Replies
View Related
Oct 23, 2012
I want to make macro for converting Vector RGB to CMYK. So I did New Macro Project > New Module > Start Rec. > Converted some vector RGB to CMYK > Stop Recording .
Then use same macro to other but it didn't work like photoshop action. VBA basic knowledge, So any easy method can some one know which can be use as macro. Or the proper method to do it.
View 1 Replies
View Related
Sep 5, 2013
I have been looking into polishing up some of my macro stuff by properly reacting to document settings and such and prettied something that was built for everyday use. It's a simple little tag adding tool:
To try it out just download the attached zip and extract the GMS file into: C:UsersYOUR USERNAMEAPPDATARoamingCorelCorelDRAW Graphics Suite X6DrawGMS
Then in CD go to Tools ==> Macros ==> Macro manager and launch the Show Form bit. If you have a document open and a shape selected it should work just fine.
View 14 Replies
View Related
Aug 23, 2013
I have a macro that I've written that works flawlessly for what I need it to do but only if 1 corel window/job is open at a time. If I could get the macro to just check to see if other jobs are open first and warn me. I can hit ok then clsoe those jobs then proceed with my macro.
View 4 Replies
View Related
May 29, 2012
What I am trying to do is check if a shape does not match a known set of values. If it does not it will run code where the "If msgbox" is at. What I have works if my line or object has a Cyan outline. The issue I am having is when it is checking a line that is any other color that doesn't have Cyan = 100, it errors out.
Below is what I am trying to use.
Sub Start() Dim s As Shape Dim sr As ShapeRange ' ActivePage.Shapes.All.CreateSelection Set sr = ActiveSelectionRange For Each s In sr If s.Type = cdrTextShape Then GoTo s_A If s.Outline.Color.CMYKCyan = 100 Then GoTo s_A If MsgBox("dude", vbOKCancel) = vbCancel Then GoTo s_B s_A: Next ss_B:End Sub
View 14 Replies
View Related
Jul 18, 2013
I'm just trying to put together a macro that will automate saving a selected group of objects to an AI file, however, I need it to be Compatible with version 8.
I've followed code from older posts to the forum and have successfully exported out a PNG file... I'm hoping to just alter that... here is what I have so far:
Set filter = ActiveDocument.ExportBitmap(path & filename, cdrAI, r, cdrPalettedImage, w, h, 96, 96, cdrNormalAntiAliasing, False, False, True, False, cdrCompressionNone)
With filter
.Finish
End With
What would I change to allow it to be compability with AI 8?
View 2 Replies
View Related
