Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1862 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【4912】使用可能から私用不可への変更 まめ 05/4/16(土) 11:07 質問[未読]
【4920】Re:使用可能から私用不可への変更 小僧 05/4/18(月) 10:54 発言[未読]
【4933】Re:使用可能から私用不可への変更 まめ 05/4/20(水) 15:02 お礼[未読]
【4912】使用可能から私用不可への変更
質問  まめ E-MAIL  - 05/4/16(土) 11:07 -
引用なし
パスワード
   よろしくお願いします.

使用可能にしているコンボボックスがサブフォーム内にあり,
中止ボタンを押すと、使用不可に変更したいのですが,
『コントロールがフォーカスを取得しているときは、
　　コントロールを無効にすることは出来ません』
というメッセージが出てしまいます.
使用不可に変更する前に
フォーム（サブフォーム外）の別のボタンにフォーカスをもっていく
コードは書いているつもりなのですが,うまくいきません
どうしたらよいでしょうか？

Me."別のボタン名".SetFocus
…
Me."サブフォーム名".Form.コンボボックス名.Enabled = False
【4920】Re:使用可能から私用不可への変更
発言  小僧  - 05/4/18(月) 10:54 -
引用なし
パスワード
   ▼まめ さん：
おはようございます。

>フォーム（サブフォーム外）の別のボタンにフォーカスをもっていく
当方も色々と試してみたのですが、これについては解決できませんでした。
識者の回答をお待ちしております。

>中止ボタンを押すと、使用不可に変更したいのですが
とりあえずの回避策として、サブフォームにある別のコントロールに
フォーカスを持たせると目的のコンボボックスは使用不可にできる模様です。

　　Me.[サブフォーム名].Controls![他のコントロール].SetFocus
　　Me.[サムフォーム名].Controls![コンボボックス名].Enabled = False
【4933】Re:使用可能から私用不可への変更
お礼  まめ E-MAIL  - 05/4/20(水) 15:02 -
引用なし
パスワード
   こんにちは

>>フォーム（サブフォーム外）の別のボタンにフォーカスをもっていく
>当方も色々と試してみたのですが、これについては解決できませんでした。
>識者の回答をお待ちしております。
>
そうですか…
よろしくお願いします。

>>中止ボタンを押すと、使用不可に変更したいのですが
>とりあえずの回避策として、サブフォームにある別のコントロールに
>フォーカスを持たせると目的のコンボボックスは使用不可にできる模様です。
>
>　　Me.[サブフォーム名].Controls![他のコントロール].SetFocus
>　　Me.[サムフォーム名].Controls![コンボボックス名].Enabled = False
はい、とりあえず、ラベルを目立たないように小さーく作って､
そこにフォーカスを当ててみました。
（全部非表示･不可にしたかったので。）

ありがとうございます
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1862 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078230
(SS)C-BOARD v3.8 is Free