Article ID: 190137
Article Last Modified on 1/23/2007
Private Sub ReportHeader_Format(Cancel As Integer, _
FormatCount As Integer)
Me!MyTitle.OleData = Forms!frmRunReport!CustomTitle.OleData
End Sub
Form: frmRunReport
------------------------------------------------------
Caption: Run Report
Unbound Object frame (Microsoft Word Document object):
Name: CustomTitle
Locked: No
Enabled: Yes
Command button:
Name: RunReport
Caption: Run Report
OnClick: [Event Procedure]
Private Sub RunReport_Click()
DoCmd.OpenReport "Sales by Category", acViewPreview
End Sub
163435 VBA: Programming Resources for Visual Basic for Applications
Additional query words: heading
Keywords: kbhowto kbprogramming KB190137