Discussion :

[ferronimus]

Sa fait depuis quelque temps que j'ai terminer ma macro, et je travaille sur des éventuelles erreur de l'utilisateur, j'ai constater que l'orsque l'utilisateur rentrait un . ou , ou ' ou " et d'autre dans ses donnée , du genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

fiche "GH14"

mon programme plante, est ce qu'il est possible de changer remplacer ces caractères par des espaces, d'une facon simple, du genre directement dans le code de la textbox, celles ci étant vide, car mon programme est très complet, et je ne souhaite pas l'allourdir
j'ai trouvé http://www.developpez.net/forums/sho...d.php?t=370325
mais je n'arrive pas à bien l'utilisé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 46 Then KeyAscii = 0 
End Sub

j'obtient qu'un espace lorsque j'appuis sur la mauvaise touche

[jfontaine]

en effet une méthode est d'utiliser le keypress

pour toi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
select case keyascii
    case 46, 44, 39, 34
         keyascii= 32 
end select

pour connaitre le code ascii des caractères, tu mets dans le keypress de ta textbox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

msgbox keyascii

Par contre une petite question. Comment va réagir l'utilisateur quand il va taper un point et voir afficher une espace?

Tu pourrais aussi modifier la textbox lors de la validation du formulaire en utilisant des replace

[ferronimus]

si j'ai bien compris je peus mettre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
select case keyascii
case 46, 44, 39, 34
keyascii= 32 
end select
End Sub

j'avais déjà penser au replace mais mon code est tellement compliquer j'ai déjà des quantité énorme de boucle de sécuriter, je ne souhaite plus en rajouter,
pour l'utilisateur il recevra une formation à ma macro
PS : ma macro gère le suivie du matériels métrologique de l'entreprise, ajout de matériels, gestion des pannes, calcul par weidbull de la futures dates de vérifications

[ferronimus]

Sa marche pas.

[jfontaine]

qu'est ce qui ne marche?
Le code dans keypress?
Qu'elle est l'erreur?

[ferronimus]

Sa marche pas lorsque je place

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
select case keyascii
case 46, 44, 39, 34
keyascii= 32 
end select

dans le code da ma textbox
le programme prend toutes les information notés , mais c pas grave g enfin décider d'utiliser des replace, au lieu d'utiliser directement les valeurs des textbox dans mon programme, j'utilise des variables ensuite replace pourtous les mauvais caractéres, sa me fait une centaine deligne en plus mais copier/coller et control F mon aidé. noueau problème remplacer un guillement avec replace
ferronimus