I have one workstation that cannot run Oberon Color Replacer (lf_ColorReplacer29.3.8.gms). He always gets this run time error. Debugging always leads to this snippet about the palettes. I thought it might have something to do with a registry value so I deleted the whole registry key but no dice. It stills shows the same error. Any ideas on how to make it work again?
The only thing it is doing there is looping the Palettes. You could try that in your own subroutine and see if you get the same result. Sub LoopPalettes() For i = 1 To Application.Palettes.Count: Debug.Print Application.Palettes(i).Name, i + 1: NextEnd Sub If you do get the same error I would reset the workspace. Hold down F8 while opening CorelDRAW and say yes to the reset. -Shelby
Sub LoopPalettes() For i = 1 To Application.Palettes.Count: Debug.Print Application.Palettes(i).Name, i + 1: NextEnd Sub
Sorry but I'm a newb at coding. I'll add the whole sub and the GMS so you can get the overall view before I ask this question. Are you saying that I could replace this sub with yours?
This is happening on two workstations running the same version of CDR 2024 and the same OS (Windows 11).
If_ColorReplacer29.3.8.zip
No don't replace anything. Start a new Document, then open the Script Editor. You should see a section for the new documentClick This Document and Paste the code there. Make sure you have the Immediate Window open then you can run the code and you should see the results in the Window.
I got it. One of the workstations gave an error. I switched to the default workspace and the macro worked. So it's definitely a corrupt workspace. The other workstation is being used by a remote employee so I'll schedule some time to fix hers too. Thanks for your help!
Happy to Help.