web-dev-qa-db-ja.com

VBA Userformテキストボックスのデフォルト値と強調表示

ユーザーフォームで、TextBoxのデフォルト値を設定します。これは、フォーカスされたときに強調表示されます。

Private Sub UserForm_Initialize()

NameTextBox.Value = "Your Name Here"

NameTextBox.SetFocus

End Sub

このコードを実行すると、カーソルはデフォルトのテキストの最後、つまり「...ここ」の後に設定されます。 「ここにあなたの名前」を強調表示して、フォームが生成されたときに、ユーザーがデフォルト/プレースホルダーのテキストを置き換えられるようにしたい。

編集可能なデフォルト値を設定するコードの記述を手伝っていただけますか？

excelvbatextboxuserform
6
blahblahblah

これにより、TextBox内のすべてのテキストが選択されます。

Private Sub UserForm_Initialize()
With Me.NameTextBox
    .Value = "Your Name Here"
    .SetFocus
    .SelStart = 0
    .SelLength = Len(.Text)
End With
End Sub
12
Doug Glancy

EnterFieldBehaviorプロパティをfrmEnterFieldBehaviorSelectAllに設定して、フォーカスがそのフィールドに移動すると、フィールド全体が選択されるようにします。

0
MBGtips