OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Search Forums

Showing results 1 to 25 of 47
Search took 0.02 seconds.
Search: Posts Made By: dungbtl
Forum: CorelDRAW/Corel DESIGNER VBA 02-06-2019, 13:24
Replies: 1
Views: 1,596
Posted By dungbtl
Try here: ...

Try here:
https://forum.oberonplace.com/showthread.php?t=24816&highlight=color+shape

This works in X4 ... not so sure for new vers, least I havent tried it.

Select the object w/ color and it...
Forum: CorelDRAW/Corel DESIGNER VBA 22-10-2018, 05:43
Replies: 5
Views: 1,907
Posted By dungbtl
@shark Wooo... many months later. Yes...

@shark

Wooo... many months later.

Yes this code is good as well.

Need some code fixing for 2018 version
Forum: CorelDRAW/Corel DESIGNER VBA 16-09-2018, 05:00
Replies: 1
Views: 2,216
Posted By dungbtl
Select Same Outline, Fill, Outline & Fill 2018

This code is outdated for 2018. Any conversion or something better?
Would like to be able to select either Fill or Outline or Both.


Public Declare Function GetAsyncKeyState& Lib "user32" (ByVal...
Forum: CorelDRAW/Corel DESIGNER VBA 31-08-2018, 14:18
Replies: 11
Views: 2,015
Posted By dungbtl
Sub FillRandShapes() Const MaxSize = 15 Const...

Sub FillRandShapes()
Const MaxSize = 15
Const MinSize = 5
Dim s As Shape, X#, Y#, w#, h#, z&
ActiveDocument.Unit = cdrMillimeter
ActivePage.GetBoundingBox X, Y, w, h
Randomize
...
Forum: CorelDRAW/Corel DESIGNER VBA 21-03-2018, 16:56
Replies: 23
Views: 16,025
Posted By dungbtl
Knowbody Nice code but it's far different...

Knowbody

Nice code but it's far different from what wOxxOm made prior.

I liked the fact that the cursor changed and you can select any
object to change into. I use this in x4 alot and its...
Forum: CorelDRAW/Corel DESIGNER VBA 18-03-2018, 06:06
Replies: 5
Views: 1,907
Posted By dungbtl
Thanks Nobody It works in X4 & 2017 just...

Thanks Nobody

It works in X4 & 2017 just fine.

Pint of Guinness to your right :drink:
Forum: CorelDRAW/Corel DESIGNER VBA 18-03-2018, 06:02
Replies: 23
Views: 16,025
Posted By dungbtl
Jinkies! 10 years ago :beer: Is it possible...

Jinkies! 10 years ago :beer:

Is it possible to get this updated for Coreldraw 2017 ??
Nothing happens & I've never had much of a clue

Thanks!
Forum: CorelDRAW/Corel DESIGNER VBA 27-07-2017, 07:34
Replies: 5
Views: 1,907
Posted By dungbtl
Objects Inside ~ Centered Within

There are objects inside a shape, square, circle or whatever.

How to group them and become centered within that shape?

I guess they would become grouped if they aren't and center within?

See...
Forum: CorelDRAW/Corel DESIGNER VBA 13-05-2017, 10:21
Replies: 6
Views: 1,725
Posted By dungbtl
Forget that.... This is ideal!! Works for me. ...

Forget that.... This is ideal!! Works for me.
Dont need to get more complicated.

What about multiple objects... is that a shaperange?

I'll draw up what I was referring to in a few.

Thnaks
Forum: CorelDRAW/Corel DESIGNER VBA 11-05-2017, 05:39
Replies: 6
Views: 1,725
Posted By dungbtl
Oh man Shark.... sorry for the late reply. Very...

Oh man Shark.... sorry for the late reply. Very Bizzie.

Thanks for this... need some time to digest it though.

Any way to get it to remove Proportionate sizing?

Otherwise it's working good....
Forum: CorelDRAW/Corel DESIGNER VBA 27-04-2017, 04:50
Replies: 6
Views: 1,725
Posted By dungbtl
Thanks shark but doesnt do anything, Compile...

Thanks shark but doesnt do anything, Compile Error.

Isnt the code partial?
Forum: CorelDRAW/Corel DESIGNER VBA 22-04-2017, 07:50
Replies: 6
Views: 1,725
Posted By dungbtl
Copy another objects Height or Width

Any code for copying another objects Width OR Height?
Either one but not both, not proportional.
So I guess 8 code snippets? Just difining which direction.

I have at least over a 100+ shortcuts...
Forum: CorelDRAW/Corel DESIGNER VBA 18-04-2017, 07:15
Replies: 4
Views: 1,154
Posted By dungbtl
Apparently rendered CTRL+L useless but still is...

Apparently rendered CTRL+L useless
but still is assigned to Combine


Since I am here: .AI SPLITS OBJECT / TEXT !?!?!?!??!

What gives with .AI export. When I choose to export an object,...
Forum: CorelDRAW/Corel DESIGNER VBA 13-03-2017, 07:47
Replies: 1
Views: 960
Posted By dungbtl
Objects Selected - Now send to Print Preview

Ok, the code below is working and only selects whats on the page.
Then I would manually goto File > Print Preview (PP)

How to reduce this to save a step and go directly to PP


Sub...
Forum: CorelDRAW/Corel DESIGNER VBA 08-03-2017, 11:57
Replies: 4
Views: 1,154
Posted By dungbtl
Well, it was nice. Try and export an object....

Well, it was nice.

Try and export an object. By accident I managed
to bring an object(s) to another layer without the
transparency. No luck, you cannot remove the Lens.
Look in Object Manager...
Forum: CorelDRAW/Corel DESIGNER VBA 08-03-2017, 07:18
Replies: 4
Views: 1,154
Posted By dungbtl
Cool... I've added the Ungroup. This helps...

Cool...

I've added the Ungroup. This helps alot on certain layers.
Then if I need to get back to 0% no transparency, Made a 2nd instance:

s.Transparency.ApplyUniformTransparency 0


Sub...
Forum: CorelDRAW/Corel DESIGNER VBA 28-02-2017, 05:57
Replies: 4
Views: 1,154
Posted By dungbtl
Talking Shortcut for entire layer to be Transparent Lens ?

Is there a way to select all within a single Layer
to go transparent? maybe at a fixed %, i.e. 50%

Or maybe input a % dialog?

I've come across a few times where I had to manually
do a Trans...
Forum: CorelDRAW/Corel DESIGNER VBA 15-04-2016, 16:04
Replies: 7
Views: 5,380
Posted By dungbtl
Thumbs up How about this for a stretch... With text or...

How about this for a stretch...

With text or objects close together

Individual outlines per object w/ offset?

Liking that AB one alot. :looney:
Forum: CorelDRAW/Corel DESIGNER VBA 22-03-2016, 05:47
Replies: 7
Views: 5,380
Posted By dungbtl
Blast from the Past....

Wow, 10 years later and I find this. How...?

Was curious as to why Create Boundary is faster than welding objects together.
I know they're diff animals to say, but they act the same except CB...
Forum: CorelDRAW/Corel DESIGNER VBA 13-03-2016, 06:58
Replies: 5
Views: 3,225
Posted By dungbtl
Run time error -2421354352345345235 and...

Run time error -2421354352345345235

and Shells didnt either because its in X5.

Another time maybe. Thanks
Forum: CorelDRAW/Corel DESIGNER VBA 11-03-2016, 15:26
Replies: 5
Views: 3,225
Posted By dungbtl
Hey thats cool. Now what about reversing it?...

Hey thats cool.

Now what about reversing it?

Anotherwords, I have single stroke letters for engraving.
Sometimes the characters get broken up at the nodes
resulting in many segments,...
Forum: CorelDRAW/Corel DESIGNER VBA 09-03-2016, 05:30
Replies: 2
Views: 1,830
Posted By dungbtl
Hey thanks shel, always to the rescue. Once...

Hey thanks shel, always to the rescue.

Once im in small caps I still have to go back to the button to
go back normal....
Forum: CorelDRAW/Corel DESIGNER VBA 21-02-2016, 10:31
Replies: 2
Views: 1,830
Posted By dungbtl
Small Capitals

An older post showed where Alex provided a piece of code (http://forum.oberonplace.com/showthread.php?t=850&highlight=changecase): yes.... old post for CD12


Ok... works good to also swap out...
Forum: CorelDRAW/Corel DESIGNER VBA 28-02-2015, 06:42
Replies: 9
Views: 5,435
Posted By dungbtl
Thumbs up Shark, You're 100% correct on that. But it's...

Shark,
You're 100% correct on that. But it's not just for text. It works for regular
objects that have holes inside also. I like it, made my work even faster for my needs.

:winkgrin:
Forum: CorelDRAW/Corel DESIGNER VBA 19-02-2015, 09:38
Replies: 9
Views: 5,435
Posted By dungbtl
Lol... man... shelby & sean are never tired doing...

Lol... man... shelby & sean are never tired doing codes as such.

Thanx a batch! You too Shark. :applause:

This will work quite well.
Showing results 1 to 25 of 47

 
Forum Jump

All times are GMT -5. The time now is 14:24.


Powered by vBulletin® Version 3.8.1
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
Copyright © 2011, Oberonplace.com