I have made a VB application that has the ability to set the dimensions of the image (visible layers) being exported. However, I want the user to be able to know the starting size before modification. How do I get the exact size of the PNG to be exported?
Thank you Sean
One way might be to:
celestrial said:how do I define a shape range that contains all the data to be exported via code
I was thinking of something like this:
Dim srForExport as ShapeRange Set srForExport = ActivePage.Shapes.FindShapes(Query:="@com.layer.printable='true'")
or
Dim srForExport as ShapeRange Set srForExport = ActiveSelectionRange.Shapes.FindShapes(Query:="@com.layer.printable='true'")
...depending on what content you want to export.
I don't know much about that. I might try using Shell:
Sub test_open_file_in_PP() Call Shell("C:\Program Files\Corel\CorelDRAW Graphics Suite 2018\Programs64\CorelPP.exe d:\Capture.PNG", vbMaximizedFocus) End Sub
There may be much better ways to do that; perhaps someone else will comment.