Forum: Macros/Add-ons
02-10-2017, 11:55
|
Replies: 1
Views: 2,263
Intersects
You would need to add a loop to loop through all your shapes and check them for Intersects.
-Shelby
|
Forum: CorelDRAW/Corel DESIGNER VBA
06-03-2017, 22:54
|
Replies: 2
Views: 1,116
Custom Icon
Just to add to this, I normally create a custom toolbar to add my custom icon to, then you can export the workspace and the new toolbar. This will give you XML you need to add if you want to add the...
|
Forum: CorelDRAW/Corel DESIGNER VBA
02-03-2017, 01:02
|
Replies: 4
Views: 1,174
Lots of Shapes
If you are working with a lot of shapes grouping makes things go move faster. So you could do something like this:
Sub MakeLayerTransparent()
Dim s As Shape
Set s =...
|
Forum: CorelDRAW/Corel DESIGNER VBA
17-02-2017, 12:46
|
Replies: 12
Views: 1,943
Nodes Example
If you could post an example .cdr file it would be helpful. A before and after example workds best.
-Shelby
|
Forum: CorelDRAW/Corel DESIGNER VBA
16-01-2017, 16:39
|
Replies: 1
Views: 1,189
Code
The code works fine in X6 16.4.1.1281 so I am going to guess it is a bug in that version.
-Shelby
|
Forum: General
16-01-2017, 16:34
|
Replies: 1
Views: 2,347
X8 Improvements
The biggest X8 improvement for me is the support of High DPI screens. That said, I only have one machine with such a screen and I currently do not use it often. So I still spend most of my time in...
|
Forum: Macros/Add-ons
15-12-2016, 14:03
|
Replies: 6
Views: 3,599
Select Effects
Here you go, select your shape or shapes and run the SelectEffects
Sub SelectEffects()
Dim sr As ShapeRange, srNewSelection As New ShapeRange
Dim s As Shape
Dim eff As Effect
...
|
Forum: CorelDRAW/Corel DESIGNER VBA
04-12-2016, 02:13
|
Replies: 2
Views: 2,040
Order ShapeRange
Create a Function that places the Shape in the position you wish in the ShapeRange and then have it return that ShapeRange. Here is an example of the function. If your position is greater then the...
|
Forum: CorelDRAW/Corel DESIGNER VBA
04-12-2016, 01:27
|
Replies: 7
Views: 5,408
Examples
dungbtl,
I would need some examples, but then I could see if I can get the results you want.
-Shelby
|
Forum: CorelDRAW/Corel DESIGNER VBA
04-12-2016, 01:25
|
Replies: 1
Views: 1,434
Excel
You can always open Excel and do your coding there, you will get help and all the fun stuff.
-Shelby
|
Forum: CorelDRAW/Corel DESIGNER VBA
04-12-2016, 01:22
|
Replies: 11
Views: 12,548
64-bit Version
Here is a 64-bit version. It is 64-bit only, but you may compare to the other to see what I changed:
Public Const OFN_ALLOWMULTISELECT = &H200&
Public Const OFN_EXPLORER = &H80000
Public Const...
|
Forum: CorelDRAW/Corel DESIGNER VBA
04-12-2016, 00:21
|
Replies: 1
Views: 1,186
Custom Form
Is the Custom Form on the X8 Machine?
You can also comment out that line and see if it is the issue.
Another way to make sure what line is cause the problem is to set a break point very early...
|
Forum: General
04-12-2016, 00:19
|
Replies: 1
Views: 2,163
Text Italic
Hopefully this helps:
Sub Change_Police_Altà()
Dim tr As TextRange
Set tr = ActiveShape.Text.Selection
tr.Font = "Lucida Bright"
tr.Size = 7
tr.Italic = True
|
Forum: CorelDRAW/Corel DESIGNER VBA
08-10-2016, 14:24
|
Replies: 1
Views: 1,230
X8 Error
What is the error message you are getting?
-Shelby
|
Forum: Site News
16-06-2016, 22:54
|
Replies: 1
Views: 9,714
New Server
Alex,
Thank you! I have noticed the speed bump!
-Shelby
|
Forum: CorelDRAW/Corel DESIGNER VBA
31-05-2016, 00:26
|
Replies: 6
Views: 3,115
X8
I have X4 - X8 installed on one system and X6 - X8 on another system and do not have any issues. What type of issues are you having?
X8 supports several more languages. You only see the ones you...
|
Forum: Macros/Add-ons
04-04-2016, 14:48
|
Replies: 1
Views: 2,705
ApplyStyle TextRange
I can confirm that ApplyStyle does not seem to work with a TextRange, only the entire Shape.
-Shelby
|
Forum: CorelDRAW/Corel DESIGNER VBA
28-02-2016, 21:08
|
Replies: 2
Views: 2,300
Hex Colors
There is no built in way. I would suggest Os Hex Macro if you are using a version of CorelDRAW X6 or earlier:
wOxxOm Hex Color (http://macromonster.com/index.php?mod=descr&id_desc=52)
Best of...
|
Forum: CorelDRAW/Corel DESIGNER VBA
23-02-2016, 10:24
|
Replies: 2
Views: 1,845
SmallCaps
I did not try this in X4, but in X6 you can do something like:ActiveShape.Text.FontProperties.Uppercase = cdrSmallCapsFontCase
Hopefully that helps,
-Shelby
|
Forum: Calendar Wizard
23-09-2015, 18:39
|
Replies: 1
Views: 5,288
Calendar Wizard
It is working for me in X7.6 which version of X7 are you using? 32 or 64-bit?
-Shelby
|
Forum: CorelDRAW/Corel DESIGNER VBA
21-09-2015, 10:58
|
Replies: 4
Views: 3,437
Vba
You are correct it will never happen. We were so very luck just to get 64-bit. They didn't even want to do that.
|
Forum: CorelDRAW/Corel DESIGNER VBA
19-09-2015, 19:12
|
Replies: 4
Views: 3,437
MZ-Tools
These tools are 32-bit COM (ActiveX) add-ins. So if you want to use them you need to be 32-bit. I have a 32-bit Windows 7 VM running X4 - X7 that allows me to use them.
I am attaching a...
|
Forum: Macros/Add-ons
23-08-2015, 19:46
|
Replies: 1
Views: 2,153
Nsis
I have not seen this, but if you want to send me your NSIS script, or the section that is having issues I will test for you and see if I see the same results.
-Shelby
|
Forum: CorelDRAW/Corel DESIGNER VBA
09-04-2015, 12:26
|
Replies: 1
Views: 1,842
Thank You
Thank you Craig so much for sharing what you have found with the group.
-Shelby
|
Forum: CorelDRAW/Corel DESIGNER VBA
29-03-2015, 13:39
|
Replies: 1
Views: 1,691
Templates
Patti,
Template data is normally stored in a few spots. Online, which you will need to download first if you wish to open via VBA. There is currently no way to download Content from the Content...
|