Is it possible (via Macro I assume??) to convert all of the text in a CDR from CMYK to RGB?
Sub Text2RGB()Dim s As Shape 'changes colors of text shapes on activelayer For Each s In ActiveLayer.FindShapes(, cdrTextShape) If s.Fill.UniformColor.IsCMYK Then s.Fill.UniformColor.ConvertToRGB NextEnd Sub
Just to be clear on how I use this... i've opened Macro Editor, and Pasted this text in, Saved it. Then wtih Macro Editor open on the side bar, i've gone to the newly added "Text2RGB" item, Clicked Run... Did I miss something? because it's not going through any process... I've tried highlighting text, i've tried on various pages... nothing... I feel I'm missing something... thanks!
Macro works with current layer. You can replace "ActiveLayer" to "ActivePage", then macro will work with all text shapes on the current page