ник: kot_k_k
так надо мысля.
сделал мульку - перед отчетом открываю отчет в невидимом режиме - для получения максимального номера страницы на которой располагается ОбластьДанных (вот как на неё еще перейти в невидимом режиме - пока ручками тестим).
получаю Кол-во страниц и Макс. Номер страницы Области данных.
если они совпадают - колонтитул последней страницы отчета делаем невидимым, а Примечание отчета - видимым.
если нет - значит на последней странице находится только примечание отчета и нужно убрать колонтитул предпоследней страницы разместив на ней Примечание.
вроде гут логически, но отрабатывает почемуто не праивльно - скрывает колонтитул первой страницы.
вот че загнал в форматирование.
Private Sub НижнийКолонтитул_Format(Cancel As Integer, FormatCount As Integer)
If КОл_во_Страниц <> 1 Then
If Признак_расположение_Области_данных_на_Поледней_стр= 1 Then ' на последней
If Me.Page = КОл_во_Страниц Then
Me.НижнийКолонтитул.Visible = False
Else ' на предпоследней
Me.НижнийКолонтитул.Visible = True
End If
Else
If Me.Page >= КОл_во_Страниц - 1 Then
Me.НижнийКолонтитул.Visible = False
Else
Me.НижнийКолонтитул.Visible = True
End If
End If
Else
Me.НижнийКолонтитул.Visible = False
End If
End Sub
|
при форматировании все пробегает нормально - но пропадает колонтитул первой страницы - почему собственно?