VBA Userform文本框默认值并突出显示

Question

在我的UserForm中,我想为我的TextBox设置一个默认值,在聚焦时会突出显示.

Private Sub UserForm_Initialize()

NameTextBox.Value = "Your Name Here"

NameTextBox.SetFocus

End Sub

当此代码运行时,光标应设置在默认文本的末尾,即"...... Here"之后.我希望突出显示"Your Name Here",以便在生成表单时,用户可以开始替换该默认/占位符文本.

你能帮我写代码来设置可编辑的默认值吗？

Answer 1

这将选择TextBox中的所有文本:

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