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 18-01-2008, 16:11
ebu
Guest
 
Posts: n/a
Default Shaperange to Layer

Hello, I have a little question..


I save the shapes with..

ActivePage.Layers("Document").Activate
Set sr = ActiveLayer.Shapes.All



then

Application.ActiveDocument.ActivePage.Layers("Document").Delete
Application.ActiveDocument.ActivePage.CreateLayer ("Document")



and would like the shapes put in the layer back..

ActivePage.Layers("Document").Activate
For i = 1 To sr.Count
Set s = sr(i)
' missig code to put the shapes in the layer back
Next



Have anyone a clue?

regards

P.S. It make sense
Reply With Quote
  #2  
Old 19-01-2008, 04:35
wOxxOm's Avatar
wOxxOm wOxxOm is offline
Senior Member
 
Join Date: Mar 2005
Posts: 836
Default

shaperange contains only links to actually extisting shapes, so at the moment you delete the layer the SR shaperange array is invalid. You should copy the shapes first, maybe to a temporary layer.
Reply With Quote
  #3  
Old 19-01-2008, 04:44
ebu
Guest
 
Posts: n/a
Default

Thanks for this information.
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
Problem moving objects to master layer knowbodynow CorelDRAW/Corel DESIGNER VBA 2 23-05-2007 18:33
Move objects to selected layer (either "a" or "b") 6fazer CorelDRAW/Corel DESIGNER VBA 3 07-03-2007 19:10
::LayerControl:: macro for FAST layer management in CorelDraw wOxxOm CorelDRAW/Corel DESIGNER VBA 0 10-05-2006 11:40
::Layer name:: ALWAYS show in title [VBAmacro] wOxxOm CorelDRAW/Corel DESIGNER VBA 0 04-05-2006 15:07
VBA help needed - changing colours fremoikaner CorelDRAW/Corel DESIGNER VBA 1 18-11-2004 06:06


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


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