Mass Conversion of CMYK Text to RGB Text in Corel 2018?

Is it possible (via Macro I assume??) to convert all of the text in a CDR from CMYK to RGB?     

Parents
  • 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
        Next
    End Sub

Reply Children
No Data