ポンタ
2020/11/26 (木) 13:08:50
0029a@1c915
ご確認ありがとうございます。「F送付」のレコードソースはクエリになっています。
住所等の情報は「T会社情報」にあり、「Q送付」にひっぱっています。
Q送付のフィールド名は 送付ID、郵便番号、住所1、住所2、会社ID、会社名、部署名、氏名ID、氏名、送付資料1、送付資料2・・
といった感じです。
「普段は登録している企業を選択したら情報を引っ張ってくる」についてですが、
「F送付」の「cbo氏名ID」にて氏名を選択すると以下VBAが動きます。
Private Sub cbo氏名ID_AfterUpdate()
Me.cbo氏名ID.Requery
If Me.txt住所1 = "" Then
MsgBox "住所が入力されていません。"
ElseIf Me.txt郵便番号 = "" Then
MsgBox "郵便番号が入力されていません。"
End If
End Sub
フォームは帳票です。
アイデアがあるとうれしいです。ご検討ありがとうございます。
通報 ...
フォームは帳票にしていますが、よく考えたら単票でもいいです。
都合の良い方で宜しくお願い致します。