Select (highlight) Text in txtBox at Initialization

H

Hal

When tabing through the text boxes on my form all data within a text box is
selcted because the EnterFieldBehavior is set to select all. On form
initilization the first text box in the tab order has the cursor at the end
of the field. I want to have all text in this box selected at form
initalization.

You advise is appreciated to fill in the line of code below, txtBoxName,


Private Sub UserForm_Activate()
txtBoxName (select all the text in the box)
End Sub
 
B

Bob Phillips

Maybe

Private Sub UserForm_Activate()
With txtBoxName

.SelLength = Len(.Text)
.SelStart = 0
.SetFocus
End With
End Sub
 
M

Mike H

Hi,

Try this

Private Sub UserForm_Initialize()
With Me.TextBox1
.Value = "test"
.SelStart = 0
.SelLength = Len(.Value)
End With
End Sub

Mike
 
H

Hal

Thanks Mike, Worked as needed.

Mike H said:
Hi,

Try this

Private Sub UserForm_Initialize()
With Me.TextBox1
.Value = "test"
.SelStart = 0
.SelLength = Len(.Value)
End With
End Sub

Mike
 
Top