[CDR 2017-2021] Экспорт конкретной страницы

[izrukvruki]

У меня есть серия файликов - где на 1й стр. баннер, на 2й стр. логотип
Мне нужно:
- 1ю страницу экспортировать как NAME_ban.jpg
- 2ю страницу экспортировать как NAME_logo.jpg

Сейчас такая конструкция, экспортирует текущую...

Set expJPGfiltr = ActiveDocument.ExportBitmap("Z:/Дизайнер/" + name_file + "_ban.jpg", cdrJPEG, cdrCurrentPage, _
opt.ImageType, , , opt.ResolutionX, opt.ResolutionY, opt.AntiAliasingType, , , opt.UseColorProfile)
With expJPGfiltr
.Progressive = False
.Optimized = True
.Compression = 10
.Smoothing = 5
.Finish
End With

а как поменять текущую я не знаю...

 

[Alek32]

ActiveDocument.Pages(1).Activate
    Set expJPGfiltr = ActiveDocument.ExportBitmap("Z:/Дизайнер/" + name_file + "_ban.jpg", cdrJPEG, cdrSelection, _
    opt.ImageType, , , opt.ResolutionX, opt.ResolutionY, opt.AntiAliasingType, , , opt.UseColorProfile)
    With expJPGfiltr
    .Progressive = False
    .Optimized = True
    .Compression = 10
    .Smoothing = 5
    .Finish
    End With
    
     ActiveDocument.Pages(2).Activate
    Set expJPGfiltr = ActiveDocument.ExportBitmap("Z:/Дизайнер/" + name_file + "_logo.jpg", cdrJPEG, cdrSelection, _
    opt.ImageType, , , opt.ResolutionX, opt.ResolutionY, opt.AntiAliasingType, , , opt.UseColorProfile)
    With expJPGfiltr
    .Progressive = False
    .Optimized = True
    .Compression = 10
    .Smoothing = 5
    .Finish
    End With