Подскажите, можно ли управлять шириной отчета...

У меня отчет на двух альбомных листах в ширину (прим.45 см). но иногда надо распечатать только первый лист (на втором листе одни нули).

Я делаю так в Report_Open, прячу все контролы со второго листа (им заранее прописал в Tag=Page2) и сдвигаю на первый лист:

Dim ctlTemp As Control

For Each ctlTemp In Me.Controls

With ctlTemp
If .Tag = "Page2" Then
.Visible = False
.Left = 0
.Width = 0
End If
End With
Next ctlTemp


В результате у меня второй лист - просто пустой идет. Можно ли уменьшить ширину отчета, чтобы этого второго пустого листа вообще видно не было.

Можно, конечно, печатать только нечетные страницы и т.д., но: 1) неудобно просматривать перед печатью, 2) в перспективе возможно отчет развернется до трех альбомных листов в ширину.

Вот.

???

Если кому интересно, я справился сам - открывал репорт в дизайне сначала,

DoCmd.OpenReport "My REport", acViewDesign

делал, все, что нужно,

....
Reports("My REport").Width = 10000


потом открывал нормально...

DoCmd.OpenReport "My REport", acViewPreview