ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Userform (https://www.excelbanter.com/excel-programming/318254-userform.html)

Jenny

Userform
 
I have a userform that a user inputs data into. I have
set up code that will give a message box if certain
conditions are not satisfied when data is entered into a
text box. When the user click OK on the msgbox, the
textbox is cleared so the proper data can be input.

If Len(txtStk.Value) < 5 Then
MsgBox "Please Check Stock number"
txtStk.Value = ""
txtStk.SetFocus
End If

This all work fine, but the cursor moves to the next box
in the tab order. I would like to cursor to stay in the
txtStk text box. Can anyone see what I am doing wrong
and please help me.

Thank you

Tom Ogilvy

Userform
 
if you are using the exit event, then setting Cancel = True will cause the
cursor not to move.

--
Regards,
Tom Ogilvy

"Jenny" wrote in message
...
I have a userform that a user inputs data into. I have
set up code that will give a message box if certain
conditions are not satisfied when data is entered into a
text box. When the user click OK on the msgbox, the
textbox is cleared so the proper data can be input.

If Len(txtStk.Value) < 5 Then
MsgBox "Please Check Stock number"
txtStk.Value = ""
txtStk.SetFocus
End If

This all work fine, but the cursor moves to the next box
in the tab order. I would like to cursor to stay in the
txtStk text box. Can anyone see what I am doing wrong
and please help me.

Thank you




Frank Kabel

Userform
 
Hi
in which event do you put this code. Normally this should work?

--
Regards
Frank Kabel
Frankfurt, Germany

"Jenny" schrieb im Newsbeitrag
...
I have a userform that a user inputs data into. I have
set up code that will give a message box if certain
conditions are not satisfied when data is entered into a
text box. When the user click OK on the msgbox, the
textbox is cleared so the proper data can be input.

If Len(txtStk.Value) < 5 Then
MsgBox "Please Check Stock number"
txtStk.Value = ""
txtStk.SetFocus
End If

This all work fine, but the cursor moves to the next box
in the tab order. I would like to cursor to stay in the
txtStk text box. Can anyone see what I am doing wrong
and please help me.

Thank you



Jenny

Userform
 
I am using the "afterupdate" event.

Thanks again


-----Original Message-----
if you are using the exit event, then setting Cancel =

True will cause the
cursor not to move.

--
Regards,
Tom Ogilvy

"Jenny" wrote in

message
...
I have a userform that a user inputs data into. I have
set up code that will give a message box if certain
conditions are not satisfied when data is entered into

a
text box. When the user click OK on the msgbox, the
textbox is cleared so the proper data can be input.

If Len(txtStk.Value) < 5 Then
MsgBox "Please Check Stock number"
txtStk.Value = ""
txtStk.SetFocus
End If

This all work fine, but the cursor moves to the next

box
in the tab order. I would like to cursor to stay in

the
txtStk text box. Can anyone see what I am doing wrong
and please help me.

Thank you



.


Tom Ogilvy

Userform
 
If your main purpose is to validate the entry then I would use the exit
event and take advantage of the Cancel argument.

--
Regards,
Tom Ogilvy

"Jenny" wrote in message
...
I am using the "afterupdate" event.

Thanks again


-----Original Message-----
if you are using the exit event, then setting Cancel =

True will cause the
cursor not to move.

--
Regards,
Tom Ogilvy

"Jenny" wrote in

message
...
I have a userform that a user inputs data into. I have
set up code that will give a message box if certain
conditions are not satisfied when data is entered into

a
text box. When the user click OK on the msgbox, the
textbox is cleared so the proper data can be input.

If Len(txtStk.Value) < 5 Then
MsgBox "Please Check Stock number"
txtStk.Value = ""
txtStk.SetFocus
End If

This all work fine, but the cursor moves to the next

box
in the tab order. I would like to cursor to stay in

the
txtStk text box. Can anyone see what I am doing wrong
and please help me.

Thank you



.





All times are GMT +1. The time now is 07:44 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com