Силовой отчет нижнего колонтитула внизу страницы

Question

В Microsoft Access 2007,

Есть ли способ отображения нижнего колонтитула отчета в нижней части последней страницы? Сейчас мой раздел «Нижний колонтитул отчета» всегда следует за моим разделом «Детали», поэтому он заканчивается где угодно.

Я хотел бы избежать использования VBA как можно больше.

Answer 1

Должен ли быть нижний колонтитул отчета или требуется, чтобы текст появился в нижней части страницы на последней странице отчета? Если это так, то это может быть сделано с очень небольшим количеством VBA:

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer) 
If Page = Pages Then 
    Me.[TextBoxName].Visible = True 
Else 
    Me.[TextBoxName].Visible = False 
End If 
End Sub 

Идея заключается в том, что вы поместите текстовое поле в нижнем колонтитуле и только сделать его видимым на последней странице.

Кроме того, вы можете прочитать http://support.microsoft.com/kb/208979/en-us

Answer 2

Я нашел лучший способ here - вы можете иметь большой колонтитула отчета, который не ест половину места на вашей странице в разделе Сведения о

в основном вам нужно добавить следующий код в отчет (хотя вы могли бы поставить его в общий модуль):

Sub SetGrpFtrLoc(Rpt As Report, GrpFtrLoc As Double) 
    GrpFtrLoc = GrpFtrLoc * 1440  'Convert from inches to twips. 
    If Rpt.Top < GrpFtrLoc Then   'Not at location yet, so 
     Rpt.MoveLayout = True   'move to next print location. 
     Rpt.NextRecord = False   'Do not go to next record. 
     Rpt.PrintSection = False  'Do not print the section. 
    End If        'Until the required offset is reached 
End Sub 

вы можете поместить следующее в процедуре события для от формата колонтитул отчета в.

Private Sub ReportFooter_Format(Cancel As Integer, FormatCount As Integer) 
    Call SetGrpFtrLoc(Me.Report, 8)  'Display report footer at least 
             '8 inches from the top of the page 
End Sub 

(пример MS сделал SetGrpFtrLoc функции и назвал его непосредственно в случае от формата колонтитул отчета, в в моем случае мне нужно делать другие вещи, в случае с форматом, поэтому я сделал это в Sub)