If Statement and Message Box error

[jwong03]

Hi,

I'm trying to use an if statement for my userform that I'm building like so and want it show like so:

txtempid:

If textempid < 1000 Then textempid = ""
MsgBox "Please enter valid Emp ID", vbOKOnly
Else: textempid.Value
End If

Can someone please help me correct it?

[jindon]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

Perhaps

Please Login or Register  to view this content.

[Trebor76]

Hi jwong03,

Welcome to the forum!!

You could also use a listbox that is populated with the employee id's (either from a sheet or directly via code) so that user only has to select the relevant id. This eliminates the need to check the data entry made by the user.

Regards,

Robert

[jwong03]

Thank you!!

I managed to get it working with this instead:

If txtempid.Value <= 1000 Then
MsgBox ("Please enter valid Emp ID")
Else:
Sheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).Offset(1) = txtempid.Value
Sheets("Sheet1").Cells(Rows.Count, 2).End(xlUp).Offset(1) = txtfirstname.Value