OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Developer Forums > VBA > CorelDRAW/Corel DESIGNER VBA

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 02-01-2007, 10:36
ddonnahoe's Avatar
ddonnahoe ddonnahoe is offline
Senior Member
 
Join Date: Jan 2004
Location: Louisville, KY
Posts: 552
Send a message via ICQ to ddonnahoe Send a message via AIM to ddonnahoe Send a message via MSN to ddonnahoe Send a message via Yahoo to ddonnahoe
Default Name Property not working

I have the following code that, for some reason, will not update the s.Name property. Any ideas?
Code:
Sub RegistrationColor()
    Dim s As Shape
    Set s = ActiveSelection
    s.OrderToBack
    s.Combine
    s.Outline.Width = 0
    s.Fill.UniformColor.RegistrationAssign
    s.Name = "PlaceHolder"
End Sub
__________________
Sean
Waiting for a ride in the T.A.R.D.I.S.
Reply With Quote
  #2  
Old 02-01-2007, 12:19
shelbym's Avatar
shelbym shelbym is offline
Senior Member
 
Join Date: Nov 2002
Location: Cheyenne, WY
Posts: 1,782
Blog Entries: 11
Send a message via ICQ to shelbym Send a message via AIM to shelbym Send a message via MSN to shelbym Send a message via Yahoo to shelbym
Default Combine

It does not work because you combined your shape. Change the s.Combine to Set s = s.Combine and it will work or even better do it like this:
Code:
Sub RegistrationColor()
    Dim s As Shape
    Set s = ActiveSelection.Combine
    s.OrderToBack
    s.Outline.Width = 0
    s.Fill.UniformColor.RegistrationAssign
    s.Name = "PlaceHolder"
End Sub
Shelby

Last edited by shelbym; 02-01-2007 at 12:22.
Reply With Quote
  #3  
Old 02-01-2007, 12:31
ddonnahoe's Avatar
ddonnahoe ddonnahoe is offline
Senior Member
 
Join Date: Jan 2004
Location: Louisville, KY
Posts: 552
Send a message via ICQ to ddonnahoe Send a message via AIM to ddonnahoe Send a message via MSN to ddonnahoe Send a message via Yahoo to ddonnahoe
Default

Thanks, dude. I have been sweatin' that for a long time.
__________________
Sean
Waiting for a ride in the T.A.R.D.I.S.
Reply With Quote
Reply


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
default the crop property tonywong Corel Photo-Paint VBA 4 22-11-2008 20:38
Working with complex documents easier Alex FAQ 1 30-04-2006 06:28
Palette (or Colors array) property in VBA class in CDR12 zlatev CorelDRAW/Corel DESIGNER VBA 7 22-02-2005 11:28
Property Bar Refresh narcix CorelDRAW/Corel DESIGNER VBA 2 01-10-2003 11:37
VB6, GMS questions bbolte CorelDRAW/Corel DESIGNER VBA 12 06-12-2002 15:32


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


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