Bonjour,
je voudrais vérifier qu'une cellule est bien remplie avant l'impression.
Voici mon codeOr si ma cellule B4 est vide, l'impression a quand même lieu.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Private Sub Workbook_BeforePrint(Cancel As Boolean) If Range("B4") = "" Then Call MsgBox("Saisie de B4 obligatoire" _ & vbCrLf & "" _ & vbCrLf & "Merci" _ , vbExclamation, "Tableur") Range("B4").Select Else Cancel = True End If End Sub
Ce code est bien dans thisWorkbook.
Ce que je ne comprends pas non plus, c'est que j'ai mis des points d'arrêt qui n'arrêtent rien...
Est-ce que quelqu'un voit mon erreur, svp.
Merci
Partager