Condition pour MessBox
Résolu
zabouall
-
amigo -
amigo -
Bonjour,
je souhaite executer la suite de mon programme que si 3 champs sont remplis. Si jamais ce n'est pas le cas, une message box apparait et arrete le code.
Voici mon code qui ne fonctionne pas (qu'il y ai ou non des valeurs dans les trois TextBox CMJ, poidspiece et coutpiece le message s'affiche et bloc la suite)
If IsEmpty(CMJ) Or IsEmpty(poidspiece) Or IsEmpty(CoutPiece) Then MsgBox ("Toutes les informations ne sont pas remplis"), vbOKOnly
Exit sub
Deuxieme problème, je souhaite en cliquant sur un bouton enregistrer crée un nouveau classeur (si il n'existe pas déja) et copier des valeurs dedans! J'ai beau avoir regardé sur plein de site je ne voie pas comment faire!
Merci d'avance pour votre aide
je souhaite executer la suite de mon programme que si 3 champs sont remplis. Si jamais ce n'est pas le cas, une message box apparait et arrete le code.
Voici mon code qui ne fonctionne pas (qu'il y ai ou non des valeurs dans les trois TextBox CMJ, poidspiece et coutpiece le message s'affiche et bloc la suite)
If IsEmpty(CMJ) Or IsEmpty(poidspiece) Or IsEmpty(CoutPiece) Then MsgBox ("Toutes les informations ne sont pas remplis"), vbOKOnly
Exit sub
Deuxieme problème, je souhaite en cliquant sur un bouton enregistrer crée un nouveau classeur (si il n'existe pas déja) et copier des valeurs dedans! J'ai beau avoir regardé sur plein de site je ne voie pas comment faire!
Merci d'avance pour votre aide
A voir également:
- Condition pour MessBox
- Excel cellule couleur si condition texte - Guide
- Excel condition ou - Guide
- Excel soustraction avec condition ✓ - Forum Excel
- Excel champ calculé avec condition - Forum Excel
- Nbval avec condition - Forum Excel
4 réponses
Bonjour,
Il y a une erreur dans l'ecriture de la condition If, essaie comme ça:
Salut.
Il y a une erreur dans l'ecriture de la condition If, essaie comme ça:
If IsEmpty(CMJ) Or IsEmpty(poidspiece) Or IsEmpty(CoutPiece) Then
MsgBox ("Toutes les informations ne sont pas remplis"), vbOKOnly
Exit sub
End If
Salut.
tu peux également faire comme ça:
;o)
If CMJ.Text = "" Or poidspiece.Text = "" Or CoutPiece.Text ="" Then
MsgBox "Toutes les informations ne sont pas remplies", vbOkOnly
Exit Sub
End If
;o)
Re,
Pour ta deuxième question, le plus facile serait d'enregistrer une macro en faisant toutes les opérations manuellement.
Une fois terminé, tu stoppe l'enregistrement et tu modifie le code VBA généré par l'enregistrement automatique.
Si tu ne t'en sors pas, c'est plus facile pour nous de t'aider avec un bout de macro déjà écrit.
A+.
Pour ta deuxième question, le plus facile serait d'enregistrer une macro en faisant toutes les opérations manuellement.
Une fois terminé, tu stoppe l'enregistrement et tu modifie le code VBA généré par l'enregistrement automatique.
Si tu ne t'en sors pas, c'est plus facile pour nous de t'aider avec un bout de macro déjà écrit.
A+.