Debug.Print "Processing shape: " & sh.Name Debug.Print "Outline width: " & sh.Outline.Width View the output in the (Ctrl+G in VBA editor). This logs the macro's behavior without interrupting your workflow with popups.
Loop through all pages and all layers.
At the top of your macro, turn off screen updating. At the bottom, turn it back on. coreldraw macros better