ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   setfocus after a msgbox (https://www.excelbanter.com/excel-programming/314762-setfocus-after-msgbox.html)

simpleMod

setfocus after a msgbox
 

Hello,
I have a userform where i validate if the text entered can be formatte
to a number (double). When the check is false, a msgbox pops up sayin
"text entered is a number." [retry] [cancel]

If Not IsNumeric(wtStr) Then
If MsgBox(wtStr & " is not a weight value.", 5) = vbRetry Then
Me.BoxWeightTextBox.Text = ""
Me.BoxWeightTextBox.SetFocus
End If
End If

This is the code fragment. I expected the focus to go back text box
but instead shifts to the next tabstop.

Am I doing something wrong? or is this a newbie mistake? HELP!!

Thanks in advance

--
simpleMo
-----------------------------------------------------------------------
simpleMod's Profile: http://www.excelforum.com/member.php...fo&userid=1572
View this thread: http://www.excelforum.com/showthread.php?threadid=27245


Bob Phillips[_6_]

setfocus after a msgbox
 
It works for me if I have that code in a button click event.

Where are you calling it from?

--

HTH

RP

"simpleMod" wrote in message
...

Hello,
I have a userform where i validate if the text entered can be formatted
to a number (double). When the check is false, a msgbox pops up saying
"text entered is a number." [retry] [cancel]

If Not IsNumeric(wtStr) Then
If MsgBox(wtStr & " is not a weight value.", 5) = vbRetry Then
Me.BoxWeightTextBox.Text = ""
Me.BoxWeightTextBox.SetFocus
End If
End If

This is the code fragment. I expected the focus to go back text box
but instead shifts to the next tabstop.

Am I doing something wrong? or is this a newbie mistake? HELP!!

Thanks in advance.


--
simpleMod
------------------------------------------------------------------------
simpleMod's Profile:

http://www.excelforum.com/member.php...o&userid=15724
View this thread: http://www.excelforum.com/showthread...hreadid=272454





All times are GMT +1. The time now is 02:02 AM.

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