いつも大変お世話になっております。m(_ _)m
Accessのフォームにて、データを入力します。
入力している画面に「印刷」というボタンを作り、入力し終わった情報をレポート印刷(出力)したいです。
フォームもレポートも作成済みです。
データの区分けとしては、「管理No.」というフィールドが主キーであります。「現在画面に表示されているデータ」とは、「現在画面に表示されているデータの管理No.」ということになります。
その管理No.を抽出条件とし、印刷を行いたいです。
ごく簡単な方法で教えてほしいと思います。
なんとなく想像からすると、クエリを作り、抽出条件にその時の画面の管理No.を取り込む・・・というか・・・そんなイメージはありますが、どうすればいいのか分かりません。
よろしくお願い致します。m(_ _)m
No.1
- 回答日時:
レポート印刷時に条件を設定できます。
OpenReportメソッドの4つ目の引数です。
例:
Private Sub コマンド1_Click()
If IsNull(Me![管理No.]) = False Then
DoCmd.OpenReport "レポート名", acViewNormal, , "[管理No.]=" & Me![管理No.]
End If
End Sub
さっそくのお返事ありがとうございます。
レポートの「開くとき」の「イベントプロシージャ」の中に↑を記述すればいいのでしょうか?
すみません。やってみましたが、うまくいきません。
マクロなどを使って、ボタンに「レポートを開く」というような動作を割り当てるわけですよね?(きっと)その時、レポートに↑を記述して管理No.で印刷されるように制御するということでしょうか?
お手数おかけします。よろしくお願いします。m(_ _)m
No.2
- 回答日時:
#1です。
説明不足でした。
フォームの印刷ボタンのクリック時のイベントプロシージャに#1のソースを記述してください。
レポートはそのままで、変更しなくて結構です。(全レコード印刷される状態で大丈夫です。)
フォームのボタンを押した時に、特定のレコードを指定してレポートを印刷することが出来ます。
何度も回答ありがとうございます。
できました!!!すばらしく!!!簡単に!!!!!
本当に本当に本当にありがとうございました!!!!
No.3
- 回答日時:
WhereCondition と呼ばれる引数を利用します。
Private Sub コマンドXXXX_Click()
On Error Resume Next
If Nz(Me.管理番号) > 0 Then
DoCmd.OpenReport "XXXX", acXXXXX, , "管理番号=" & Me.管理番号
Else
MsgBox "入力未了にて印刷できません。", _
vbExclamation, _
" 処理中断のお知らせ"
End If
End Sub
注意事項としては、フォームに入力しただけでは入力データの保存・登録が完了していません。
その対策は、上記コードでは行っていません。
No.4ベストアンサー
- 回答日時:
#3さんの仰るとおり、入力直後(保存前)に印刷ボタンを押すと入力中の内容は反映されませんね。
忘れていました。プログラムを修正します。
Private Sub コマンド1_Click()
Me.Refresh
If IsNull(Me![管理No.]) = False Then
DoCmd.OpenReport "レポート名", acViewNormal, , "[管理No.]=" & Me![管理No.]
End If
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- Access(アクセス) access レポート 請求書について 2 2022/07/04 22:52
- Excel(エクセル) エクセルでキーリストからデータを取り出して1枚1枚印刷するには? 11 2022/06/27 09:52
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- Excel(エクセル) エクセルのマクロで複数シートを両面印刷するには? 2 2022/12/08 23:23
- PHP PHPで入力フォームでデータを確認表示画面まで送る流れを日本語で理解したいのです。 1 2023/05/29 19:12
- Excel(エクセル) 請求書と領収書の作成 4 2022/11/10 16:13
- Word(ワード) ワード2010でコメントを印刷しない方法 6 2023/07/20 14:27
- その他(プログラミング・Web制作) Accessの代わりのノンプログラムデータベース作成 4 2022/10/21 09:26
- UNIX・Linux Ubuntu22.04、nanoエディタの使い方について 2 2022/10/24 19:50
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
ACCESS フォームをそのまま印刷について
その他(データベース)
-
アクセスのフォーム画面の印刷についてです。
Access(アクセス)
-
Access レポート印刷するときに1ページに収める方法
Access(アクセス)
-
-
4
Access フォームで条件抽出したものを印刷プレビューしたい
Access(アクセス)
-
5
サブフォームのあるフォームからレポートを作成し、印刷しようとすると、サブフォームにあるデータ量分印刷
Access(アクセス)
-
6
サブフォームの印刷方法を教えてください。
Access(アクセス)
-
7
アクセスで特定のレコードのみのレポートを印刷したいのですが。
Access(アクセス)
-
8
Access VBAでメインフォームとサブフォームを印刷するには?
Access(アクセス)
-
9
アクセスの画面をプリントスクリーンでとる方法
その他(ソフトウェア)
-
10
(ACCESS)条件に応じて、テキストボックスを表示・非表示設定
その他(データベース)
-
11
ACCESSで、フォームで抽出したものをレポートで印刷したいのですが・・・
Access(アクセス)
-
12
アクセスのレポートのヘッダーを2ページ以降にもつけるには?
Access(アクセス)
-
13
ACCESS フォームで抽出したデータのみをレポートで表示したい
Access(アクセス)
-
14
Accessのフォーム上にレコード数とレコード番号の表示
その他(データベース)
-
15
Access印刷プレビューでデータが表示されない
PowerPoint(パワーポイント)
-
16
ACCESSで値を代入できないとは?
Visual Basic(VBA)
-
17
Accessのレポート上のテキストボックス値を設定したい
その他(データベース)
-
18
PrintFormを使用してのプリント
Visual Basic(VBA)
-
19
Access チェックボックスでチェックしたデータのみフォームで表示
Access(アクセス)
-
20
アクセスの印刷VBAを教えて下さい
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Access レポート印刷するときに...
-
ACCESS フォームをそのまま印刷...
-
ACCESS チェックしたも...
-
アクセスのレポート合成(複数...
-
ボタン1つで1度に複数枚印刷す...
-
Accessフォームからパラメータ...
-
ACCESSのレポートで、指定した...
-
アクセスで特定のレコードのみ...
-
サブフォームの印刷方法を教え...
-
Access2013 レポートを印刷する...
-
アクセスで希望のレポートを1枚...
-
Accessのフォームで、画面表示...
-
ACCESSの複数レポートの印刷に...
-
Access印刷範囲の設定(...
-
データベースのINT型項目にNULL...
-
YahooのIDがロックされてしまい...
-
レコードを保存するコード ア...
-
passwordが入れられません・・・・
-
アクセスでテキストボックスの...
-
EXCEL VBAのユーザーフォームに...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Access レポート印刷するときに...
-
ACCESS フォームをそのまま印刷...
-
アクセスのレポート合成(複数...
-
アクセスで特定のレコードのみ...
-
Accessフォームからパラメータ...
-
ACCESSの複数レポートの印刷に...
-
Accessのフォームで、画面表示...
-
Access2013 レポートを印刷する...
-
ACCESSのレポートで、指定した...
-
アクセスのフォーム画面の印刷...
-
【Access】フォームのプロパテ...
-
ボタン1つで1度に複数枚印刷す...
-
MS Access 印刷時に、印刷レコ...
-
アクセスで希望のレポートを1枚...
-
ACCESS チェックしたも...
-
アクセス2000レポートで、印刷...
-
アクセスのフォーム印刷で不要...
-
Accessのレポートで1レコード...
-
Access レポート印刷時のイベン...
-
Accessのフォーム単票印刷で印...
おすすめ情報