Macro - loading a blank template file *.cdt for Grahic and Text styles

[gorgo2]

Is it possible to create a macro (if not already existing) that carries out the same function when loading a blank graphic and text style template?

You see...just to explain...we work on drawings and graphic and text styles become extensive because of different users and such. We prepare the drawing(s) to be released for production and before that can happen, the procedure is to load a blank (*.cdt) graphic and text style template to start fresh and then release the drawing.

-Greg

[shelbym]

If you are using X3, Os has a Macro that will allow you to open and save without Styles, I know it does color, not sure about text.

You can find here:

CorelDRAW VBA macros by wOxxOm

Look under the Productivity section and it is called: patch DRAW X3 behaviour on-the-fly

-Shelby

[gorgo2]

Originally Posted by shelbym

If you are using X3, Os has a Macro that will allow you to open and save without Styles, I know it does color, not sure about text.

You can find here:

CorelDRAW VBA macros by wOxxOm

Look under the Productivity section and it is called: patch DRAW X3 behaviour on-the-fly

-Shelby

Yeah, I'm aware of color style patching. This is a different animal. Graphic and Text styles. Is there a patch or macro that will 'load a blank *.cdt template'?

[shelbym]

My bad, ok this should to the trick.

LoadStyleSheet(FileName As String)

or the code might look like:

Sub LoadBlankStyleSheet()
    ActiveDocument.LoadStyleSheet "C:\Users\Shelby\Desktop\CORELDRWRGB.CDT"
End Sub

Hope I got it right this time!

-Shelby

[gorgo]

Originally Posted by shelbym

My bad, ok this should to the trick.

LoadStyleSheet(FileName As String)

or the code might look like:

Sub LoadBlankStyleSheet()
    ActiveDocument.LoadStyleSheet "C:\Users\Shelby\Desktop\CORELDRWRGB.CDT"
End Sub

Hope I got it right this time!

-Shelby

okay...will try this. thanks Shelby.

[gorgo]

SUCCESS!! thanks again Shelby.

-Greg