CTRL Ds UserForm

[Laurent]

Bonjour et félicitation pour ce site

J'ai un probléme de ctrl ds un UserForm

Je voudrais controler la donnée saisie ds un userform pour qu'elle soit saisie de la maniere suivante X12345 c-a-d une lettre et 5 chiffres

Pouvez vous m'aider
Mercià tous

Laurent

 

[MichelXld]

bonjour Laurent

j'espere que cet exemple pourra t'aider

Private Sub UserForm_Initialize()
TextBox1.MaxLength = 6
End Sub

Private Sub CommandButton1_Click()
If Not IsNumeric(Left(TextBox1, 1)) And IsNumeric(Right(TextBox1, 5)) Then
MsgBox 'Format conforme'
Else
MsgBox 'Format non conforme'
End If
End Sub


bonne soirée
MichelXld

 

[Laurent*]

Merci c'est parfait
Qu'est-ce que c bien ce site !
Bravo et merci encore