Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Checking number of characters in a TextBox
The code below check to ensure there is data in TextBox2 but I need to add
another If Statement to ensure that the number of characters in TextBox2 equals 3 characters. If TextBox2.Text = "" Then 'Initials MsgBox "Sorry but you must enter your initials" MultiPage1.Value = 0 GoTo MissingData End If |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Checking number of characters in a TextBox
Never mind
Figured it out. If TextBox2.TextLength < 3 Then MsgBox "Sorry but you must enter a 3 character initials" MultiPage1.Value = 0 GoTo MissingData End If "Patrick C. Simonds" wrote in message ... The code below check to ensure there is data in TextBox2 but I need to add another If Statement to ensure that the number of characters in TextBox2 equals 3 characters. If TextBox2.Text = "" Then 'Initials MsgBox "Sorry but you must enter your initials" MultiPage1.Value = 0 GoTo MissingData End If |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Checking number of characters in a TextBox
Try this...
If Not TextBox2.Text Like "???" Then MsgBox "Sorry but you must enter your initials" MultiPage1.Value = 0 GoTo MissingData End If You didn't show the rest of your code, so its hard to offer you an alternative, but, personally, I would rather not see GoTo being used in code like this except as part of an On Error GoTo statement. -- Rick (MVP - Excel) "Patrick C. Simonds" wrote in message ... The code below check to ensure there is data in TextBox2 but I need to add another If Statement to ensure that the number of characters in TextBox2 equals 3 characters. If TextBox2.Text = "" Then 'Initials MsgBox "Sorry but you must enter your initials" MultiPage1.Value = 0 GoTo MissingData End If |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Checking number of characters in a TextBox
This is a little nit-pickish but not everyone has three initials and some
people have more than three. Also some people add, jr. or sr. as part of their initials. So you might have to use a message box to set the rules for entering the initials. "Patrick C. Simonds" wrote: Never mind Figured it out. If TextBox2.TextLength < 3 Then MsgBox "Sorry but you must enter a 3 character initials" MultiPage1.Value = 0 GoTo MissingData End If "Patrick C. Simonds" wrote in message ... The code below check to ensure there is data in TextBox2 but I need to add another If Statement to ensure that the number of characters in TextBox2 equals 3 characters. If TextBox2.Text = "" Then 'Initials MsgBox "Sorry but you must enter your initials" MultiPage1.Value = 0 GoTo MissingData End If |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Checking number of characters in a TextBox
Thanks for your reply.
A 3 letter initial was a requirement imposed on me by the person requesting the worksheet that I am developing. I did consider the fact that not everyone has a middle name and amended my message to what you see below. If TextBox2.TextLength < 3 Then MsgBox "Sorry but your initials must be 3 characters. Enter a ? for your middle initial if you do not have one" MultiPage1.Value = 0 GoTo MissingData End If "JLGWhiz" wrote in message ... This is a little nit-pickish but not everyone has three initials and some people have more than three. Also some people add, jr. or sr. as part of their initials. So you might have to use a message box to set the rules for entering the initials. "Patrick C. Simonds" wrote: Never mind Figured it out. If TextBox2.TextLength < 3 Then MsgBox "Sorry but you must enter a 3 character initials" MultiPage1.Value = 0 GoTo MissingData End If "Patrick C. Simonds" wrote in message ... The code below check to ensure there is data in TextBox2 but I need to add another If Statement to ensure that the number of characters in TextBox2 equals 3 characters. If TextBox2.Text = "" Then 'Initials MsgBox "Sorry but you must enter your initials" MultiPage1.Value = 0 GoTo MissingData End If |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Checking number of characters in a TextBox
Thanks for your reply.
This code is part of a series of tests to ensure that all mandatory TextBoxes are filled in. I would be happy to submit all of the code for you but I was trying to keep the message down to a reasonable length. "Rick Rothstein" wrote in message ... Try this... If Not TextBox2.Text Like "???" Then MsgBox "Sorry but you must enter your initials" MultiPage1.Value = 0 GoTo MissingData End If You didn't show the rest of your code, so its hard to offer you an alternative, but, personally, I would rather not see GoTo being used in code like this except as part of an On Error GoTo statement. -- Rick (MVP - Excel) "Patrick C. Simonds" wrote in message ... The code below check to ensure there is data in TextBox2 but I need to add another If Statement to ensure that the number of characters in TextBox2 equals 3 characters. If TextBox2.Text = "" Then 'Initials MsgBox "Sorry but you must enter your initials" MultiPage1.Value = 0 GoTo MissingData End If |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Limiting number of characters in textbox | Excel Programming | |||
Limit Number Of Characters Allowed In A TextBox | Excel Programming | |||
Textbox: Number of Characters | Excel Programming | |||
Validating number of characters in textbox | Excel Programming | |||
exact number of characters in textbox | Excel Programming |