ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Textbox highlighting issue (https://www.excelbanter.com/excel-programming/349001-textbox-highlighting-issue.html)

peter.thompson[_16_]

Textbox highlighting issue
 

I have a number of textboxes on a userform. When the user enters dat
beyond accepted paramaters,

1. an error message is generated
2. the form 'close' button is locked (& changes color)
3. the offending input textbox changes color.

I also would like the cursor to return to the offending textbox afte
step 3 - how do I do this ? (apologies for what must be a basi
problem).

Here is a sample of the code I am using:

Private Sub EnterInfo_Click()

If txtStaff.Text = "" Then
MsgBox "Please enter number of staff", 64, "Error Message"
CloseButton.Locked = True
CloseButton.BackColor = &H80000013
txtStaff.BackColor = &H80000013

Else
If txtStaff = 0 Then
CloseButton.Locked = False
CloseButton.BackColor = &H80000010
txtStaff.BackColor = &H80000005


Any help much appreciated

Cheers

Peter (new to VBA

--
peter.thompso
-----------------------------------------------------------------------
peter.thompson's Profile: http://www.excelforum.com/member.php...fo&userid=2968
View this thread: http://www.excelforum.com/showthread.php?threadid=49624


Leith Ross[_429_]

Textbox highlighting issue
 

Hello Peter,

You just set the focus back on the TextBox. See your code below. Th
method is in bold type.

Private Sub EnterInfo_Click()

If txtStaff.Text = "" Then
MsgBox "Please enter number of staff", 64, "Error Message"
CloseButton.Locked = True
CloseButton.BackColor = &H80000013
txtStaff.BackColor = &H80000013
TXTSTAFF.SETFOCU

Else
If txtStaff = 0 Then
CloseButton.Locked = False
CloseButton.BackColor = &H80000010
txtStaff.BackColor = &H80000005

Sincerely,
Leith Ros

--
Leith Ros
-----------------------------------------------------------------------
Leith Ross's Profile: http://www.excelforum.com/member.php...fo&userid=1846
View this thread: http://www.excelforum.com/showthread.php?threadid=49624


peter.thompson[_17_]

Textbox highlighting issue
 

Thanks Leith - steep learning curve this VBA!

Cheers

Pete

--
peter.thompso
-----------------------------------------------------------------------
peter.thompson's Profile: http://www.excelforum.com/member.php...fo&userid=2968
View this thread: http://www.excelforum.com/showthread.php?threadid=49624



All times are GMT +1. The time now is 10:52 PM.

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