Remove TextBox Default Text

Hopefully a really simple query:

I have a userform with numerous Textboxes and comboboxes for user input - however the end users aren't too PC savvy and I'm ending up capturing "Please Enter NameJohn Smith", "Please Enter Job TitleSales Manager" etc. My original Instructions told them to tab their way through the form, meaning each time they reached a TextBox their input would overwrite the ("Please Enter x") string prompting them for input.

Is there any way to replicate this "select all" on click (globally as there are potentially 50 to 100 textboxes and 12 varients of the form)?

Penfold Auto Merged Post;OK so I've made a little progress:

Private Sub UserForm_Click()
TextBox1.SelStart = 0
TextBox1.SelLength = Len(TextBox1.Text)
End Sub

The above selects all the text in a textbox - I think I need to apply this to the textbox "on click" - however that could be achieved? Then it needs to be generalised - ie:

UserForm1.Controls("Textbox" & variant)