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 27-09-2004, 13:06
Rick Randall
Guest
 
Posts: n/a
Default Deleting Shapes on the Guides Layer

Hi-

I have hundreds of .cdrs that have shapes on the Guides Layer. These shapes are all locked. I am trying to write a macro that can simply delete all shapes on the Guides Layer. For some reason I am having trouble unlocking, and then deleting these shapes.

Help! :cry:
Reply With Quote
  #2  
Old 27-09-2004, 19:29
Alex's Avatar
Alex Alex is offline
Administrator
 
Join Date: Nov 2002
Posts: 1,940
Blog Entries: 4
Default Re: Deleting Shapes on the Guides Layer

Rick,

Here is a piece of code to delete all objects from the Guides master layer in the current document (for CorelDRAW 12):

Code:
Sub DeleteShapesFromGuides()
    Dim s As Shape
    Dim lr As Layer
    Set lr = ActiveDocument.MasterPage.Layers("Guides")
    For Each s In lr.Shapes
        If s.Locked Then s.Locked = False
        s.Delete
    Next s
End Sub
Reply With Quote
  #3  
Old 28-09-2004, 11:07
Rick Randall
Guest
 
Posts: n/a
Default

worked like a charm! Thanks!!
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
existence of layer modzho CorelDRAW/Corel DESIGNER VBA 7 04-09-2008 13:37
VBA help needed - changing colours fremoikaner CorelDRAW/Corel DESIGNER VBA 1 18-11-2004 06:06
Transfer shapes from Draw to Paint; Using CorelScript in VB6 DWGraphics Corel Photo-Paint VBA 1 18-08-2004 20:49
Bounding Guides, with & without Outlines Hernán New product ideas 0 21-01-2004 10:59
Generic code to process all shapes in a document glennwilton CorelDRAW/Corel DESIGNER VBA 0 05-09-2003 03:13


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


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