Can I return focus to a Textbox when Validation fails as part of a Sub?

As part of a UserForm I am Validating and Formatting in one pass. The problem I'm having is that when the Validation fails, I get the error message, and the focus moves on to the next text box.

I want to trap the user in a loop until they have acceptable data

Please Login or Register  to view this content.

Hello D3Pratt,

You need to set Cancel = True in APV_Exit if the validation fails.

I think might be better to ask if it's possible to actually do the the validation as part of the formatting function.

Because of the 16 entries I was thinking I wanted to have it all contained as a subroutine during Exit, but I'm not sure if I CAN do that.

Hello D3Pratt,

You can reuse a validation routine in the Exit event. You need to create a function that will return a Boolean value as a result of the validation. This can be applied to the Cancel variable in the Exit event. Copy this code into a standard VBA module.

Please Login or Register  to view this content.

The macro will validate that the entry is numeric. Spaces and empty entries are ignored. Now you can use this same line of code below (in blue) in every TextBox_Exit event.

Please Login or Register  to view this content.