Я могу добавить один диапазон, но не могу добавить несколько диапазонов и определить его в переменной:
Set PR = ActivePresentation.PrintOptions.Ranges.Add(1, 1)
Можно ли добавить несколько диапазонов к указанному выше?
Я попробовал следующее, которое сработало, но я не смог установить его равным PR
With ActivePresentation
With .PrintOptions
.RangeType = ppPrintSlideRange
With .Ranges
.ClearAll
.Add 1, 1
.Add 3, 3
End With
End With
.PrintOut
End With
Можно ли определить вышеуказанный диапазон по переменной?
Спасибо.