あん
2023/05/31 (水) 12:29:08
927ea@06086
hatena様、ご返答ありがとうございます。
先ほどは確かにフォーカスが移動してしまっていたのですが、いろいろコードをいじっていたらならなくなりました。
すみませんでした。
ですが、Parent.parent.refreshというのもあるのですが、
こちらは実行すると親フォーム(親の親ではなく)の先頭フィールドに移動してしまいます。
コードは以下の通りです。長すぎるので全ては載せきれません。
If Parent.Parent!書式ID <> 10 And Parent.Parent!書式ID <> 16 And Parent.Parent!書式ID <> 17 Then
Select Case Parent.Parent!書式ID
Case 1, 3, 5
Parent.Parent!巻替検査記録 = True ←チェックボックス(テーブルと連結)
Parent.Parent!巻替検査記録ボタン.Visible = True ←コマンドボタン
Parent.Parent.Refresh ←ここを処理すると画面の位置が上へ移動してしまいます。
通報 ...