アクセスでチェックボックスのデータをYesとNoに切り分けて印刷する方法を教えてください。

質問

Access2003を使用しています。
チェックボックス（Yes/No型）のデータをYesとNoに切り分けて印刷する方法を教えてください。
フォーム上の「チェックがついているものを印刷」「チェックがついていないものを印刷」というコマンドボタンをクリックすれば、印刷プレビューの画面にジャンプするようにしたいです。
ご教示くださいますようお願いいたします。

回答No.3

noname#79209 · ベストアンサー

#2です。一例として、
印刷コマンドボタンのクリック時イベントプロシージャで
intCheckBox = （\Me.chk契約A) * (-1) +（\Me.chk契約B) * (-2)
Select Case intCheckBox
　Case 0
　　MsgBox "契約が一つも選択されていません"
　　Exit Sub
　Case 1
　　varCriterua = "契約A = True"
　Case 2
　　varCriterua = "契約B = True"
　End Select
などと、
各チェックボックスの組み合わせ結果を判断し、Where句に指定して
DoCmd.OpenReport レポート名,acViewPreview,,varCriteria
で、レポートひらけば如何でしょう。
なお、文法的にはチェックしていません。ロジックの考え方だけ示しています。