サブフォームの入力を取り消す方法

参考サイト

https://tsware.jp/tips/tips_350.htm

Private Sub cmd取消し_Click()
‘取消しボタンクリック時

  ‘サブフォームにフォーカス移動
  Me!顧客マスタ_sub.SetFocus

  ‘元に戻すコマンドが使えない状況のときは無視
  On Error Resume Next
  ‘元に戻すコマンドを実行
  DoCmd.RunCommand acCmdUndo

End Sub