Si tu veux une box avec les choix OK et Annuler :
Essaye plutot :
If MsgBox("Sélectionne le client à facturer", vbOKCancel, "choix_client_facture")=vbcancel Then Exit Sub
Sheets("FACTURE").Select
End If
End Sub
Bonjour, merci de prendre le temps de me repondre
Je voudrais juste que si ("choix client facture") est vide, alors un message s'affiche, me demandant de selectionner
un client dans la zone "choix client facture"
Ce serait mieux d'afficher le message tant que la zone est vide et non pas si la zone est libre. Dans ce cas, il faut remplacer ton If par un bloc Do While. Si l'utilisateur veut abandonner, il peut utiliser le bouton Annuler.
Sub aller_saisie_fact()
Do While choix_client_facture = ""
If Msgbox "Sélectionne le client à facturer", vbOKCancel) = vbCancel Then Exit Do
Loop
Ilf choix_client_facture <> "" Then Sheets("FACTURE").Select
End Sub
Amicalement
Vous n’avez pas trouvé la réponse que vous recherchez ?
Sub aller_saisie_fact()
If choix_client_facture = "" Then
MsgBox "Sélectionne le client à facturer", vbOKCancel = vbCancel
Exit Sub
End If
Sheets("FACTURE").Select
End Sub
Bonjour, effectivement, avec cette macro, lorsque "choix_client_facture" est vide, un message me dit de "Selectionner le client a facturer", mais quand un client est selectionner, le même message apparait et à aucun moment il ne me renvoi à ma feuille de facturation (facture).
Peut-être la msgbox pourrait-elle contenir Okonly ?
Sub aller_saisie_fact()
If choix_client_facture = "" Then
MsgBox "Sélectionne le client à facturer", vbOkOnly
Exit Sub
End If
Sheets("FACTURE").Select
End Sub
Bonjour, suite essai derniere macro, le message s'affiche bien, mais il s'affiche dans les deux cas, c'est à dire que la zone (choix_client_facture) est = à "" et quand un client est selectionner
Oui, une liste deroulante contenant :
plaged entree: BD_nomclient
cellule liee : choix_client_facture
ensuite un bouton, qui renvoi a saisi facture, si et seulement si ma liste deroulant contient un nom, c'est à dire que "choix_client_facture" n'est pas égal à zéro
j'espere bien me faire comprendre afin que vos lumières me guide vers la réussite de ce preojet, merci
Je pense que tu n'as pas mis Option Explicit dans ton code. Mets-le dans la première ligne de ta fenêtre Visual Basic.
Si choix_client_facture est le nom d'une cellule, il faut utliser Range("choix_client_facture").Value :
Bonsoir, avec cette macro, lorsque que "choix_client_facture" est vide, le message apparait, jusque là tout va bien
mais lorsqu'il y a un client selectionner, il ne se passe rien
vous êtes près du but
merci
Sub aller_saisie_fact()
If Range("choix_client_facture").Value = "" Then
MsgBox "Sélectionne le client à facturer", vbOKOnly
End If
Exit Sub
Sheets("FACTURE").Select
End Sub