OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Corel User Forums > CorelDRAW > Macros/Add-ons

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 26-09-2014, 12:29
gorgo gorgo is offline
Senior Member
 
Join Date: Feb 2010
Posts: 169
Default MACRO - delete all object styles and sets

Is there such a thing? I'd like to make a macro but don't know where to start. I tried recording the action but only got this:

Recording of this command is not supported: StyleModify



Any help on this?
CORELDRAW X7
Reply With Quote
  #2  
Old 28-09-2014, 12:41
shelbym's Avatar
shelbym shelbym is offline
Senior Member
 
Join Date: Nov 2002
Location: Cheyenne, WY
Posts: 1,790
Blog Entries: 12
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 Delete Styles

This should get you started:
Code:
Sub DeleteObjectStyles()
    Dim d As Document
    
    Set d = ActiveDocument
    
    Do Until d.StyleSheet.AllStyleSets.Count = 0
        d.StyleSheet.AllStyleSets(1).Delete
    Loop
    
    Do Until d.StyleSheet.AllStyles.Count = 0
        d.StyleSheet.AllStyles(1).Delete
    Loop
End Sub
Happy coding...

-Shelby
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
Global Macro delete Michael Cervantes CorelDRAW/Corel DESIGNER VBA 17 16-11-2010 08:11
Macro - loading a blank template file *.cdt for Grahic and Text styles gorgo2 Macros/Add-ons 5 27-04-2010 23:25
Macro Reqd For Color Styles ginc Macros/Add-ons 1 03-12-2008 08:53
Delete small objects macro Jeff Harrison New product ideas 3 19-05-2007 12:19
Delete color styles click101 CorelDRAW/Corel DESIGNER VBA 2 01-12-2006 16:40


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


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