condition textbox vba un peu spéciale

[aldarion]

Bonsoir,

Je suis à la recherche d'un utilisateur vba/excel expérimenté afin de savoir s'il est possible et, si oui , comment faire pour obliger un utilisateur à respecter un format prédéfini dans une textbox en y ajoutant une condition de vérification.
La textbox en question doit être remplie avec "BO######" , j'ai tenté diverses choses dans vba pour que le champ ne soit pas accepté si ce n'était pas le cas et je n'ai malheureusement pas reussi. j'ai donc initialize() le format dans la textbox et en Enter(), j'ai laissé le "BO" sans laisser la possibilité à l'utilisateur d'utiliser autre chose que des chiffres. Néanmoins, je souhaiterais savoir s'il est possible d’empêcher l’utilisateur de supprimer ce "BO" tout en pouvant tout de même remplir la textbox et de créer une condition du genre :

if textbox >< "BO######" then
textboxErreur.visible = true
else
textboxErreur.visible = false
end if



Voila, je sais que c'est un peu spécial, j'ai fait un peu le tour des forum mais difficile de trouver une demande aussi spécifique sans connaître les termes adaptés.

En m'excusant pour le dérangement et en remerciant celui/celle qui pourra me renseigner.


Aldarion

 

[mapomme]

Bonsoir @aldarion et bienvenue sur XLD

Je pars du principe que si le texte doit commencer par "BO", alors il est inutile de mettre "BO" dans le TextBox de saisie.
Une piste dans le fichier joint... Voir le code du Userform1.

 

[aldarion]

Ok, je te remercie, je jete un oeil à ça

 

[aldarion]

J'avoue ne pas du tout avoir pensé à cette manière de procéder , puis-je te demander un résumer de ce que fait ta boucle for car je ne suis pas sur d'avoir tout compris.

Merci bcp btw

 

[mapomme]

Re,

Voir le code commenté dans le fichier joint.

nota : Il faut remarquer lorsqu'on place s dans textbox2, on risque de relancer la procédure : Private Sub TextBox2_Change().
Mais s n'étant composé que de chiffres, le deuxième passage ne changera pas la valeur de textbox2. Donc on ne repart jamais une troisième fois dans la procédure. Il existe des manière de faire pour éviter le deuxième passage mais cela rajoute des instructions qui ici ne valent ni le coup ni le coût.

 

[aldarion]

D'accord, merci bcp en tout cas .

dernière petite question (plus une curiosité qu'autre chose) : n'es-tu pas censé définir le type de tes variables quand tu les déclares ?

 

[mapomme]

Re,

n'es-tu pas censé définir le type de tes variables quand tu les déclares ?

Tu as raison. Je ne l'ai pas fait et c'est pas bien du tout . J'aurais dû écrire :

Dim x$, i&, s$

($ pour le type String, & pour le type Long).