Excel - Validacion datos

Hola amigos
Estoy comenzando en esto de crear formularios con VBA, y tengo una consulta.
Que codigo seria necesario para obligar a introducir en un textbox los datos con un formato determinado.
Un ejemplo. En textbox1, quiero que solo se pueda introducir un texto de 4 digitos. Si el usuario pone otra cosa, avisar con un mensaje.
Gracias anticipadas

en el evento click d eun boton coloca, por ejemplo, esto:

Dim letras As Long
letras = Len(TextBox1)
If letras <> 4 Then
MsgBox "intodusca un texto de 4 caracteres"
TextBox1 = ""
TextBox1.SetFocus
End If

Abraham