hatena
hatena
2020/06/18 (木) 15:20:19
年月欄が空白のものが存在しないときがあり、
where 条件文 = [年月] Is Null
となってますので、その場合は、フォームに新規レコードの表示になっているとおもいますが、
そうなってますか。(データ追加が可能な状態なら)
もし、そうなら、フォームを開くアクションのあとに、下記のIf文を追加すればいいでしょう。
If [Forms]![F個人情報].[newrecord]=True Then
メッセージボックス
メッセージ 新規レコードです。
Else
メッセージボックス
メッセージ 年月欄を埋めてください
通報 ...