How can I prevent printing if a cell is empty?

  • Thread starter Thread starter RonC
  • Start date Start date
R

RonC

Can anyone tell me if it is possible to create a form that cannot b
printed if specified cells are empty? I would really appreciate an
help.

Thanks,

Ro
 
Hi Ron

You can copy this event in the Thisworkbook module for A1 on "sheet1"

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "Sheet1" Then
If Range("A1").Value = "" Then Cancel = True
End If
End Sub
 
Back
Top