Msgbox et condition d'enregistrement
Bonjour,
je suis entrain de créer un contrat pour un événement.
1 client = 1 Contrat
Je souhaiterais mettre un message d'erreur si une cellule est vide et bloquer ma commande d’enregistrement et d'impression.
Je n'y arrive pas vraiment, mon message s'affiche mais dès que je le ferme je repars sur le code....
je ne trouve pas de solution pour avancer dans la macro.
Quelqu'un pourrait-il m'aider ?
Bien Cordialement.
Bonjour,
Voici un exemple,
Sub test_enregistrement()
If IsEmpty(Sheets("MaFeuille").Cells(1, 1)) Then
MsgBox "Vous devez renseigner la cellule A1"
Exit Sub
Else
Call enregistrement
End If
End Sub
Sub enregistrement()
msgbos "ok"
End Subbonjour
salut i20100 au passage.
les utilisateurs détestent les messages (et les pires sont les bloquants comme le tien). Toi, moi, tout le monde !
alors je propose de simplement mettre dans une cellule =SI(tacondition;"§ § § Remplir la cellule A1 § § §";"") en policer rouge et grande
ou encore de mettre dans la cellule à remplir une MFC rouge si vide, en fond ou bien le cadre seulement)
ou les 2
pas de VBA
amitiés
Bonjour,
@ jmd,
Comment ton message ou ta MFC vont empêcher la commande d’enregistrement et d'impression ?
Relis la question.
Cdlt.