Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

9903 / 76734

←次へ　｜　前へ→


	【72387】Re:TextBox3を入力可能状態にしたい

y60 - 12/7/26(木) 16:25 -


	引用なし

	パスワード

ichinose さん、ありがとうございます。

おかげさまで、
入力確認メッセージで、Ｎｏを選んだとき、TextBox3を入力可能状態にすることができました。
このようなコードは、とても思いつかないので、この質問箱のありがたさがよく分かります。

本当にありがとうございました。

>　　　　　Application.OnTime Now(), _
>　　　　　　　　　　　"'SetFocussp ""userform1"",""TextBox3""'"
>　　　　　　　　　　　　　　　　　　　　　'↑ユーザーフォームの名前

>Sub setfocussp(ByVal frm As Variant, ctl As Variant)
>　　Dim cfrm As Object
>　　For Each cfrm In UserForms
>　　　 If UCase(cfrm.Name) = UCase(frm) Then
>　　　　　cfrm.Controls(ctl).setfocus
>　　　　　　Exit For
>　　　　 End If
>　　　Next
>　 End Sub

10 hits

▼

【72177】TextBox1へフォーカスを移動をさせたい y60 12/6/13(水) 23:05