Access VBAでレポートに文字列を引き渡したい

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で引き渡る