If (Ì < 16 Or Ì > 150) And (Æ < 16 Or Æ > 150) Then
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionIf Ì < 16 Or Ì > 150 And Æ < 16 Or Æ > 150 Then 's'il y a une erreur donc on affiche le msg d'erreur et on traite pas les elseif msg = "error" Style = vbCritical MsgBox msg, Style ElseIf Ì > 16 Or Ì < 150 Then 'si pas d'erreur et tout est bon sur texte1 on traite texte1 Text2.Text = (Text1.Text / 2) + 7 ElseIf Æ > 16 Or Æ < 150 Then 'ce dernier elseif : si pas d'erreur et pas de traitement pour texte1 on traite texte2 ce qui est impossible : si pas d'erreur ton code traitera texte1 sil y a une erreur ton code affiche un msg d'erreur donc tu arrivera jamais à traiter le dernier elseif Text1.Text = 2 * (Text2.Text) + 7 End If