Excel VBA質問箱 IV

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

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


776 / 13645 ツリー ←次へ | 前へ→

【78391】フォームのTextBoxをフォーカス時に選択状態にする himuro 16/8/8(月) 13:29 質問[未読]
【78392】Re:フォームのTextBoxをフォーカス時に選択... β 16/8/8(月) 13:45 発言[未読]
【78393】Re:フォームのTextBoxをフォーカス時に選択... β 16/8/8(月) 13:52 発言[未読]
【78394】Re:フォームのTextBoxをフォーカス時に選択... β 16/8/8(月) 13:58 発言[未読]
【78395】Re:フォームのTextBoxをフォーカス時に選択... β 16/8/8(月) 14:03 発言[未読]

【78391】フォームのTextBoxをフォーカス時に選択...
質問  himuro  - 16/8/8(月) 13:29 -

引用なし
パスワード
   こんにちは。

activeXコントロールばかり触っていたので、今フォームコントロールを弄っているのですが、色々違いがあり戸惑っております。

activeXだと、テキストボックスフォーカス時に全選択状態にするには、
gotFocusイベントに
With TextBox1
.SelStart = 0
.SelLength = Len(.text)
End With
のような感じで書けばいけるのですが、

フォームにはgotFocusが無いので、Enterイベントがそれに当たるのかなと思い同じコードを書いたのですが、全選択されません。

Enterイベントの処理が走った後に、クリックが最後にきているから?

と思い、MouseDownイベントで今は代用しているのですが、これではケースによっては不都合が生じる場合もありそうですし、何よりしっくりきません。
何故Enterイベントでは駄目なのか・・。

これは仕様ですか?

環境:Excel2013, office32bit

【78392】Re:フォームのTextBoxをフォーカス時に選...
発言  β  - 16/8/8(月) 13:45 -

引用なし
パスワード
   ▼himuro さん:

ActiveXであればイベント処理が可能ですけどフォームコントトールですよね?
フォームコントロールは、そもそも、gotFocus であれ、Enterであれ、なんであれ、イベントそのものがありませんが?

【78393】Re:フォームのTextBoxをフォーカス時に選...
発言  β  - 16/8/8(月) 13:52 -

引用なし
パスワード
   ▼himuro さん:

コメントしたように、いまいち、やりたいことがわからないのですが

たとえば標準モジュールに以下のマクロを書いておき、フォームツールのテキストボックスに
このマクロを、マクロ登録する ということなんでしょうか?

Sub Test()
  ActiveSheet.Shapes(Application.Caller).TextFrame2.TextRange.Characters.Select
End Sub

【78394】Re:フォームのTextBoxをフォーカス時に選...
発言  β  - 16/8/8(月) 13:58 -

引用なし
パスワード
   ▼himuro さん:

もしかして・・・
フォームコントロールというのは ユーザーフォームの話でしょうか??

【78395】Re:フォームのTextBoxをフォーカス時に選...
発言  β  - 16/8/8(月) 14:03 -

引用なし
パスワード
   ▼himuro さん:

連投失礼。

もし、ユーザーフォームだとして

>Enterイベントの処理が走った後に、クリックが最後にきているから?

この意味がよくわかりませんが CommandButton 等のクリックと、この話はどう関連してくるのでしょうか?

それと、このユーザーフォーム表示はモーダルですか、モードレスですか?

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