本ページは広告が含まれています。気になる広告をクリック頂けますと、サーバ運営費になります(^^
VBAでレポートを開く際に引数を指定できる
‘PrintCardQuery に指定されたクエリ上の人が一覧表示される
stDocName = “R_00一覧”
DoCmd.OpenReport stDocName, acPreview, , , , PrintDate
※PrintDateが引数
※PrintDate = Format(Now, “yyyy/M/d”) & “新規”
レポートヘッダーにテキストボックスを配置
t_PrintDate
ヘッダーのイベントにフォーマット時に引数をレポートに渡す
Private Sub ページヘッダーセクション_Format(Cancel As Integer, FormatCount As Integer)
Me!t_PrintDate.Value = Me.OpenArgs
End Sub
※PrintDateがMe.OpenArgsで引き渡る
