こちらの問題ですが、「保存する」では解決できなさそうでした。
お伝えしたようにうまく更新される時もあったり、 できないときもあり、なぜかテーブルのフィールドが「0:00:00」になってしまった データについて、確認した内容をお伝えさせていただきます。
Private Sub Form_AfterUpdate() MsgBox "コードが実行されました" If Me.Parent!最新購入日 = Me.最新購入日 Then msgbox Me.Parent!最新購入日 &"と" & Me.最新購入日 Else Me.Parent!最新購入日 = Me.最新購入日 End If End Sub
としたところ、「0:00:00と」と表示されます。
サブフォームのフォームヘッダーかフッターにテキストボックスを配置して下記のように設定しています
名前 最新購入日 コントロールソース =Max([購入日])
メインフォームの最新購入日を表示するテキストボックスは、下記のように設定しています。
名前 txt最新購入日 コントロールソース =[サブフォームコントロール名].Form![最新購入日]
メインフォームのレコードソースのテーブル(商品テーブル)に「最新購入日」フィールドがあります。
謎です…😯
不適切なコンテンツとして通報するには以下の「送信」ボタンを押して下さい。 現在このグループでは通報を匿名で受け付けていません。 管理者グループにはあなたが誰であるかがわかります。
どのように不適切か説明したい場合、メッセージをご記入下さい。空白のままでも通報は送信されます。
通報履歴 で、あなたの通報と対応時のメッセージを確認できます。
Accessのテーブルやクエリのデータを貼り付ける場合は下記で、Markdown書式のテーブルに変換して貼り付けてください。
Markdown Tables generator
お伝えしたようにうまく更新される時もあったり、
できないときもあり、なぜかテーブルのフィールドが「0:00:00」になってしまった
データについて、確認した内容をお伝えさせていただきます。
としたところ、「0:00:00と」と表示されます。
サブフォームのフォームヘッダーかフッターにテキストボックスを配置して下記のように設定しています
名前 最新購入日
コントロールソース =Max([購入日])
※テキストボックスには2020/10/14と表示されている。
メインフォームの最新購入日を表示するテキストボックスは、下記のように設定しています。
名前 txt最新購入日
コントロールソース =[サブフォームコントロール名].Form![最新購入日]
※テキストボックスには2020/10/14と表示されている。
メインフォームのレコードソースのテーブル(商品テーブル)に「最新購入日」フィールドがあります。
※0:00:00と表示されている。
謎です…😯