CorelDRAW——VBA实例篇修改当前页面所有对象大小

应用场景：56张图改同样的尺寸大小。

为什么做了这个：corelDRAW目前不支持批量修改图片尺寸，改了56张好浪费时间

主函数 main：

Private Sub Document_QueryClose(Cancel As Boolean)

End Sub

窗口界面：

宽度输入框：

高度输入框：

修改按钮：