Sujet Précédent Sujet Suivant

Erreur aprés un msgbox

Fermé
cox188026 Messages postés 14 Date d'inscription samedi 3 décembre 2016 Statut Membre Dernière intervention 21 juin 2017 - 12 janv. 2017 à 09:19
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 - 12 janv. 2017 à 12:51
Bonjour,
dans un userform je vérifi que la valeur d'un textbox soit bien un nombre avant de continuer.
mais après avoir valider le msgbox un message d'erreur apparait au lieux de retourner sur l'userform pour que je puisse corriger l'erreur.

' copier dans les textbox en fonction de la ligne choisi
Private Sub TextBox5_Change()
If Not IsNumeric(Right(TextBox5, 1)) And Right(TextBox5, 1) <> "," Then
MsgBox "entré un numero de ligne"


End If

If Rows(TextBox5).Select Then
...
merci pour vos solution.


3 réponses

Réponse 1 / 3
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 304
12 janv. 2017 à 09:30
Bonjour,
Et quel est le message d'erreur ?
0
Réponse 2 / 3
momo
12 janv. 2017 à 12:13
Bonjour
enlève la textBox_change er mettre un KeyPress 


Private Sub TextBox5_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
 If InStr("0123456789.", Chr(KeyAscii)) = 0 Then
   KeyAscii = 0
   Beep
 End If
End Sub


A+
Maurice
0
Réponse 3 / 3
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 729
12 janv. 2017 à 12:51
Bonjour,


Où en es-tu avec ce post

https://forums.commentcamarche.net/forum/affich-34259764-ouvrir-outlook
0

Discussions similaires

Instagram "Désolé, une erreur s'est produite"
bananamilk -
cedric.masdeb -

60 réponses
Erreur vidéo inconnue sur le Freebox Player
mouhaaV2.0 -
Perejoe59 -

60 réponses
Free erreur 38 : impossible d'envoyer des SMS
warnawak -
marcellou -

58 réponses
Erreur de lecture sur iptv smarters
Bogs -
bazfile -

1 réponse
Code erreur 3000
Laurent -
JM -

5 réponses