Print, Save or E-mail Button/Function

[Guest]

Hello,

We are wondering if there is a way to create a button to “printâ€,"save", or
“email†a formatted spreadsheet. For instance, we have created an order form
in Excel and would like to insert a button/function where user can simply
click on it then it will automatically print or email if an email
button/function is available.

Thank you in advance!
--Reiko

 

[Ron de Bruin]

Hi Reiko

Activesheet.printout

For mailing and saving see
http://www.rondebruin.nl/sendmail.htm

 

[Guest]

Hi Ron,

Could you please walk me through how to set up the "activesheet.printout"?
Is it through the VBA module?

Thanks,
David

 

[Ron de Bruin]

Hi David

1) Right click on a toolbar and select "Control toolbox" in the list
2)Add a button on your sheet
3)Double click on the button

You see this

Private Sub CommandButton1_Click()

End Sub

copy the line in the event like this

Private Sub CommandButton1_Click()
ActiveSheet.PrintOut
End Sub

4)Alt-q to close the editor
5)click on the first button of the Control toolbox named "Exit design mode"

More one liners you can find here
http://www.rondebruin.nl/print.htm#Print