Cellule vide : message d'erreur a la fermeture de la feuille de calcul

H

Hulk

Guest
Lorsque je ferme mon document, j'aimerai que si la cellule (B5 par ex) est vide, je reçoive un avertissement.
Comment est ce que l'on peut faire ca ?
merci d'avance!
 
F

Fred

Guest
Private Sub Workbook_BeforeClose(Cancel As Boolean)
if range ("B5")="" then
attention = MsgBox("attention b5 est vide", vbOKCancel, "attention")
If attention = vbCancel Then
Range("b5").Value = "plus vide"
End If
End If
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
303 442
Messages
2 011 228
Membres
218 924
dernier inscrit
KED97