Microsoft Access 掲示板

サブフォームのモジュールの

Private Sub Form_AfterUpdate()

の Private を Public に修正

Public Sub Form_AfterUpdate()

メインフォームのコマンドボタンのクリック時を下記のように記述

Private Sub 更新ボタン_Click()
    Me.サブフォームコントロール名.Form.Form_AfterUpdate
End Sub

ありがとうございます。大変参考になりました。
しかし、今回のコードのせいかエラーが出ます。
「実行時エラー2471 クエリパラメーターとして指定した式でエラー'年月日'が発生しました」
エラーを発生させない方法はありますでしょうか。

サブフォーム内のコード

Public Sub Form_AfterUpdate()

    Me.Requery

    Dim maxDate
    maxDate = DMax("年月日", "T管理", "管理ID=" & Me!txt管理ID)    
    
    If Me.Parent!年月日new = maxDate Then
    Else
       Me.Parent!new = maxDate
    End If
End Sub

そのエラーがでるコードはどこですか。

ご確認ありがとうございます。
エラーが出るコードはここになります。

Private Sub 更新ボタン_Click()
    Me.Fサブ管理.Form.Form_AfterUpdate '←←ここです。
End Sub

「実行時エラー2471 クエリパラメーターとして指定した式でエラー'年月日'が発生しました」というエラーが出たときに、デバッグボタンをクリックするとその行が反転表示されるのですか。

念のために確認ですが、上記の「Fサブ管理」というのはサブフォームコントロール名ですか。
サブフォーム名とサブフォームコントロール名は別物です。

サブフォームとサブフォームコントロールの違いとは？ - hatena chips

ありがとうございます。再確認しました。サブフォームコントロール名で間違いありません。サブコントロール名とサブフォームコントロール名が同じものに設定されていたので、試しにさぼフォームコントロール名を変更して試してみましたが、エラー発生状況は同じでした。
おっしゃるとおり、デバックボタンを押すと該当の行が反転される状況です。

エラーメッセージから推測すると、サブフォームのレコードソースのクエリに問題があるように思えます。

サブフォームのレコードソースをクエリではなくテーブルにしたらどうなりますか。
それでエラーが出ないなら、クエリに問題があるということになります。
その場合は、現状のクエリのSQL文を提示してください。

テーブルにしてみたところ、リンクが切れている部分についてのエラーは出ましたが、それ以外のエラーは出ませんでした。SQL文ですが、そのまま掲載するのもちょっとあれなので、お送りさせていただきますね。ありがとうございます。

SQL文を拝見しましたが、特に問題はなさそうです。
こうなると、デバッグ作業をすることになりますが、実ファイルのないこちらでは無理です。
下記のリンク先を参考にステップ実行によるデバッグ作業を行ってください。

最も基本的なステップ実行 - Excel VBA