Excel VBA質問箱 IV

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

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


4636 / 13646 ツリー ←次へ | 前へ→

【55479】モードレス表示のユーザーフォーム 亜矢 08/5/6(火) 15:35 質問[未読]
【55480】Re:モードレス表示のユーザーフォーム kanabun 08/5/6(火) 16:23 回答[未読]
【55481】Re:モードレス表示のユーザーフォーム 亜矢 08/5/6(火) 16:29 お礼[未読]

【55479】モードレス表示のユーザーフォーム
質問  亜矢  - 08/5/6(火) 15:35 -

引用なし
パスワード
   よろしくお願いします。
モードレスでユーザーフォームを表示します。
次に選択されているセルを移動しようとしても矢印キーでは
移動しません。
 一旦マウスでそのセルをクリックすると可能になるのですが、
 マウスでクリックしなくても矢印キーで移動をさせたいのですが、
 そのような方法はできますでしょうか。
  その際のプログラムはどのように書いたらいいのか
 教えて頂きたいと思います。
 
  プログラムは単純には下記のようになっています。
  Userform1.show
  Range("B3").select
 

【55480】Re:モードレス表示のユーザーフォーム
回答  kanabun  - 08/5/6(火) 16:23 -

引用なし
パスワード
   そのUserFormの Activateイベントプロシージャに

Private Sub UserForm_Activate()
 AppActivate Application.Caption, True
End Sub

と書いておいたらどうでしょうか

【55481】Re:モードレス表示のユーザーフォーム
お礼  亜矢  - 08/5/6(火) 16:29 -

引用なし
パスワード
   ▼kanabun さん:
>そのUserFormの Activateイベントプロシージャに
>
>Private Sub UserForm_Activate()
> AppActivate Application.Caption, True
>End Sub
>
>と書いておいたらどうでしょうか
ありがとうございました。
 解決しました。
 お手数をお掛けしました。
 今後もよろしくお願いします。

4636 / 13646 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free