Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

228 / 9994

←次へ　｜　前へ→


	【13080】印刷設定について

まゆ - 16/10/6(木) 10:34 -


	引用なし

	パスワード

現在
■フォーム「F_Summary」
■フォーム「F_PreviewParentMenu」
■レポート「R_Summary」
があり、

「F_Summary」にて「印刷プレビュー」というボタンをおき、
そのボタンを実行するとフォームで表示されているレコードのみをレポートへ表示させるようにしています。(ClirntNoという顧客ごとの番号で識別しています)

「印刷プレビュー」ボタンはPrintという名前で、実行時以下のVBAを設定しています。
Private Sub Print_Click()
　　Dim stDocName As String
　　　　Dim bango As Long

　　　　bango = [ClirntNo]
　　　　stDocName = "R_Summary"

　　DoCmd.OpenReport stDocName, acPreview, , "ClirntNo =" & bango
　　
End Sub

また、
「F_PreviewParentMenu」は
こちらのホームページを参考にボタンのフォームをプレビューの子ウィンドウにしています。
ht　tp://hatenachips.blog34.fc2.com/blog-entry-397.html

そこで、この二つを組み合わせて
「F_Summary」で「印刷プレビュー」をクリックした際に
「F_PreviewParentMenu」が開き、なおかつ、「ClirntNo」で識別して開けないかと思っております。

宜しくお願い致しますm(_ _)m

158 hits

▼

【13080】印刷設定について まゆ 16/10/6(木) 10:34