ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   show a message if print (https://www.excelbanter.com/excel-discussion-misc-queries/256483-show-message-if-print.html)

CC

show a message if print
 
Hi

I need that when I click for print show a message remember me to do
something else and just iniciate printage if I agree
is it possible ??


many thanks

Jacob Skaria

show a message if print
 
Please note that this is an array formula. You create array formulas in the
same way that you create other formulas, except you press CTRL+SHIFT+ENTER to
enter the formula. If successful in 'Formula Bar' you can notice the curly
braces at both ends like "{=<formula}"

=INDEX(A1:A1000,MODE(IF(A1:A1000<"",MATCH(A1:A100 0,A1:A1000,0))))

--
Jacob


"CC" wrote:

Hi

I need that when I click for print show a message remember me to do
something else and just iniciate printage if I agree
is it possible ??


many thanks


Jacob Skaria

show a message if print
 
Please ignore my previous post .

For your query

Set the security level to low/medium in (Tools|Macro|Security). From
workbook press Alt+F11 to launch VBE (Visual Basic Editor). From the left
treeview search for the workbook name and click on + to expand it. Within
that you should see the following

VBAProject(Your_Filename)
Microsoft Excel Objects
Sheet1(Sheet1)
Sheet2(Sheet2)
Sheet3(Sheet3)
This Workbook

Double click 'This WorkBook' and paste the below code to the right code pane.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If MsgBox("Your reminder", vbYesNo + vbQuestion + _
vbDefaultButton2) < vbYes Then Cancel = True
End Sub


--
Jacob


"Jacob Skaria" wrote:

Please note that this is an array formula. You create array formulas in the
same way that you create other formulas, except you press CTRL+SHIFT+ENTER to
enter the formula. If successful in 'Formula Bar' you can notice the curly
braces at both ends like "{=<formula}"

=INDEX(A1:A1000,MODE(IF(A1:A1000<"",MATCH(A1:A100 0,A1:A1000,0))))

--
Jacob


"CC" wrote:

Hi

I need that when I click for print show a message remember me to do
something else and just iniciate printage if I agree
is it possible ??


many thanks



All times are GMT +1. The time now is 07:38 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com