COCO
2024/02/19 (月) 10:13:55
ddfe5@71072
hatenaさん ありがとうございます。Subプロシージャ、Functionプロシージャの事は少し調べました。何となくしか分かってませんが実際に試そうと思いまして(別のコードで同じフォームに記述しているものがあるので)下記の様な内容のでプロシージャを作成しました。
Public Sub record_idou()
If IsNull(Me.[F1]) Then
MsgBox"F1未入力時はレコード移動できません"
Exit Sub
End If
End Sub
これをフォームのレコード移動ボタンに下記を記述しました。
Call record_idou
DoCmd.GoToRecord , , acPrevious
試すとF1未入力時・・・・のメッセージは出るのですがレコード移動はしてしまいます。Exit Subが効いてません。
何か記述不足しているのでしょうか?
通報 ...