ACCESSのイベントで

質問

こんにちは。

ACCESSのフォームに、テキストボックスと
コンボボックスがいくつかあり、
コマンドボタンが１つあります。

コマンドボタンを押す（クリック）すると、
その直前までアクティブだったコントロールの
名前（cmb○○　or　txt○○　にしてます）が
知りたいのです。

どうすればよいでしょうか。お願いします。

ちなみに１つのフォームにコントロールが20～30あり、
そういうフォームが30～40こあるので、
そのコントロールに１つ１つイベントを
追加していく（forcusイベント等で変数に代入していく）
方法以外でお願いします。
なにしろ、全部で1000こ近くあるので・・・

回答No.3

O_cyan · ベストアンサー

質問を理解していませんでした。
>ActiveControlプロパティで現在フォーカスのあるコントロールを返してくれます
と回答してしまいましたが・・。

例えば同フォーム上のText1というコントロールに直前まであったコントロール名を表示する場合
コマンドボタンのフォーカス取得時イベントに

Me![Text1] = Screen.PreviousControl.Name

でText1にそのコマンドボタンをクリックする直前のアクティブだったコントロール名が表示できます。

お礼

ありがとうございました。
その方法でいけそうですね（実際は確認してません）。

実は〆切は今日までだったので、
実際は、マウスムーブイベント（マウスがボタンの上を通過するときのイベント）が発生するタイミングで
現在のアクティブコントロール名を変数に代入しました。

いろいろ勉強になりました。

回答No.2

naganaga_001

ActiveControlは、現在フォーカスのある
コントロールを返すので、
itodai777さんの仰る、
「その直前までアクティブだったコントロール」
とは異なり、
ボタン押下時は、押下したボタンですね。

>追加していく（forcusイベント等で変数に代入していく）
>方法以外でお願いします。
とありますので、LostFocus等のイベントで取得しておけば、
ボタンクリック時に、前のコントロールを取得できますが、それはご希望でないということですよね。

しかし、私はLostFocus等のイベントでLostFocusしたコントロールを取得しておく
以外に方法が思いつかないです…。

回答No.1

O_cyan

ActiveControlプロパティで現在フォーカスのあるコントロールを返してくれますのでそのコントロール名を取得すれば良いのでは。