![]() |
Requiring a value in a cell before allowing user to print
Good Morning,
I have an invoice that i would like to require a value in cell P2 prior to the user printing the invoice. If no value is entered a message would pop up reminding them to enter an invoice number. Any assistance would be greatly appreciated. Thank you, Wes -- Message posted via http://www.officekb.com |
Requiring a value in a cell before allowing user to print
Include the following event macro in the workbook code area:
Private Sub Workbook_BeforePrint(Cancel As Boolean) If IsEmpty(Sheets("Sheet1").Range("P2")) Then MsgBox ("Please fill P2 prior to printing") Cancel = True End If End Sub Because it is workbook code, it is very easy to install and use: 1. right-click the tiny Excel icon just to the left of File on the Menu Bar 2. select View Code - this brings up a VBE window 3. paste the stuff in and close the VBE window If you save the workbook, the macro will be saved with it. To remove the macro: 1. bring up the VBE windows as above 2. clear the code out 3. close the VBE window To learn more about macros in general, see: http://www.mvps.org/dmcritchie/excel/getstarted.htm To learn more about Event Macros (worksheet code), see: http://www.mvps.org/dmcritchie/excel/event.htm -- Gary''s Student - gsnu2007k "GainesvilleWes via OfficeKB.com" wrote: Good Morning, I have an invoice that i would like to require a value in cell P2 prior to the user printing the invoice. If no value is entered a message would pop up reminding them to enter an invoice number. Any assistance would be greatly appreciated. Thank you, Wes -- Message posted via http://www.officekb.com |
Requiring a value in a cell before allowing user to print
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Range("P2").Value = "" Then MsgBox "You must enter a value in P2" Cancel = True End If End Sub 'This is workbook event code. 'To input this code, right click on the Excel icon on the worksheet '(or next to the File menu if you maximise your workbooks), 'select View Code from the menu, and paste the code -- __________________________________ HTH Bob "GainesvilleWes via OfficeKB.com" <u32072@uwe wrote in message news:8e1ca471bf505@uwe... Good Morning, I have an invoice that i would like to require a value in cell P2 prior to the user printing the invoice. If no value is entered a message would pop up reminding them to enter an invoice number. Any assistance would be greatly appreciated. Thank you, Wes -- Message posted via http://www.officekb.com |
Requiring a value in a cell before allowing user to print
Thank you very much Gary and Bob.
Bob Phillips wrote: Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Range("P2").Value = "" Then MsgBox "You must enter a value in P2" Cancel = True End If End Sub 'This is workbook event code. 'To input this code, right click on the Excel icon on the worksheet '(or next to the File menu if you maximise your workbooks), 'select View Code from the menu, and paste the code Good Morning, [quoted text clipped - 7 lines] Thank you, Wes -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200812/1 |
Requiring a value in a cell before allowing user to print
If you're still out there an alternative is to have the Invoice Number
appear automatically without annoying the user. See John McGimpsey's site for methods. http://www.mcgimpsey.com/excel/udfs/sequentialnums.html Gord Dibben MS Excel MVP On Wed, 03 Dec 2008 14:35:33 GMT, "GainesvilleWes via OfficeKB.com" <u32072@uwe wrote: Thank you very much Gary and Bob. Bob Phillips wrote: Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Range("P2").Value = "" Then MsgBox "You must enter a value in P2" Cancel = True End If End Sub 'This is workbook event code. 'To input this code, right click on the Excel icon on the worksheet '(or next to the File menu if you maximise your workbooks), 'select View Code from the menu, and paste the code Good Morning, [quoted text clipped - 7 lines] Thank you, Wes |
Requiring a value in a cell before allowing user to print
I will take a look. Thank you.
Gord Dibben wrote: If you're still out there an alternative is to have the Invoice Number appear automatically without annoying the user. See John McGimpsey's site for methods. http://www.mcgimpsey.com/excel/udfs/sequentialnums.html Gord Dibben MS Excel MVP Thank you very much Gary and Bob. [quoted text clipped - 16 lines] Thank you, Wes -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200812/1 |
All times are GMT +1. The time now is 05:19 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com