Restriction de caractere dans une adresse email
Bonjour,
Bien qu'il s'agisse d'un forum Excel, il me semble que vous pourriez m'aider.
Il faut dire que je suis nulle en programmation
Je travaille sous une BD access et essaie mettre en place un code qui restreint la saisie de certains caractéres (tel à, é, : etc). J'ai un code mais ca ne marche. Quelqu'un pourrait-il m'aider?
Le code est le suivant:
Private Sub SITEWEB_LABO_Change()
Dim i As Integer
For i = 0 To 45 Or i > 58 And i < 63 Or i > 122
If Me.SITEWEB_LABO = " * &chr(i) &*" Then
MsgBox "caractère interdit pour adresse électronique"
End If
Next i
End Sub.
Par ailleurs y aurait-il moyen d'utiliser la codification Ascii dans ce code? Si oui Comment?
Merci d'avance