Macro for saving a single page in a multipage document

I am using CorelDraw X7 and have a document consisting of four pages.


I wish to save one or all of these pages to a cdr file. According to the Macros Help the cdrExportRange variable has three possible values, 0 for all pages, 1 for the current page only and 2 for saving only selected objects on a page.

The sub below is a slightly modified version of on presented in CorelDraw Help:

Sub Test()
    Dim RangeValue As Long
    Dim so As New StructSaveAsOptions
    Debug.Print cdrAllPages, cdrCurrentPage, cdrSelection    ' To confirm values
'    so.Range = cdrAllPages      ' 0
'    so.Range = cdrCurrentPage   ' 1
'    so.Range = cdrSelection     ' 2
    RangeValue = 1
    so.Range = RangeValue
    ActiveDocument.SaveAs "C:\Users\Holger\Test\File" & RangeValue & ".cdr", so
End Sub

If I run this with values 0 and 2 it performs as expected, creating a file with either all pages or with the selected objects only.
But if I run it with the value 1, I get a
"Run-time error '...' (80070067): Parameter Range cannot be 1".

My intention is to save each page to separate files, so this behavior is frustrating.

Am I doing something wrong here?