Accessで作る領収書④

Pocket

領収書を一覧で表示できるようにします。

例によってフォームウィザードをクリック。
領収書明細を選択し、但書以外をフィールドに選択します。

2606301

フォームのレイアウトは「表形式」を選択し次へ。
あとはそのまま次へで流して、最後はフォーム名を「領収書一覧」とし、デザインビューで
開きます。
2606302
あとはこれを変更し、最後にコマンドボタンを配置します。
2606303
配置したコマンドボタンの、イベントタブのクリック時に次のコードを入力します。

Private Sub コマンド9_Click()
DoCmd.OpenReport “領収書明細”, acViewPreview, , “領収書ID=” & Me!領収書ID & “”
End Sub

実行画面です。
2606304

あまり領収書の出し直しはないと思いますが、一覧から選択ということが簡単にできます。

今日で6月が終わり、今年も半分終わりました。
上半期は忙しくあっという間におわりましたが、下半期は地に足を付けて
将来に向けて地ならし&種まきをしたいです。

本日も最後までお読み頂きありがとうございます。