Bonjour à toutes et à tous !

J'ai un petit problème que je ne sais pas régler et j'aurais voulu avoir votre avis. Tout d'abord, voilà le bout de code concerné :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
If nomref = "X" Or nomref = "O" Or nomref = "I" Or (IsNumeric(nomref)) Or LCase(nomref) = nomref Then
                    MsgBox "Une référence ne peut pas être en minuscules, en chiffres ni comporter de X, O ou I.", vbCritical, "Erreur"
Ainsi, nomref (étant ce que je rentre dans une InputBox) ne peut être ni une minuscule, ni un X, un O ou un I, ni même un chiffre. Cependant les combinaisons marchent du moment qu'il y a un caractère autorisé dans la chaîne. Ainsi, A15 marche alors que je ne voudrais pas ça vu qu'il y a des chiffres dedans. De même, aaaaA marche car le A majuscule existe. Etc Etc.

Comment peut-on donc bloquer toutes les minuscules et tous les chiffres dans ma saisie afin que seules les majuscules, hormis X, O et I, et leurs combinaisons soient acceptées ? De plus, la saisie vide doit être autorisée et ici ce n'est pas le cas.

Cordialement.