Buenas! No soy un experto en el tema ni mucho menos, pero ... creo que esto te puede servir, en el procedimiento VALIDATE del textbox le metes esto (creo que es lo que pides)
Código:
Private Sub Text1_Validate(Cancel As Boolean)
If IsNumeric(Text1.Text) Then
'pasar el focus a otro campo o lo que quieras...
Text2.SetFocus
Else
'si no es númerico
Cancel = True
MsgBox "Introduce datos númericos"
End If
End Sub
Espero que sea lo que buscabas...
Suerte!