ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   How do I put a button on an excel spreadsheet to print a report? (https://www.excelbanter.com/excel-discussion-misc-queries/37418-how-do-i-put-button-excel-spreadsheet-print-report.html)

Casper

How do I put a button on an excel spreadsheet to print a report?
 
Hi please help
I want to put a button onto a excel spreadsheet (not the toolbar) that will
print a report for me from another sheet, what macro do I use and what
options do I use
Regards
Casper

Dave Peterson

I would record a macro when I printed what I wanted.

Then I'd use a button from the Forms toolbar and plop it onto that other
sheet--and assign that recorded macro to that button.

Your recorded macro may look something like:

Option Explicit
Sub Macro1()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

I'd change it to be more specific (and give it a nice name):

Option Explicit
Sub PrintSheet1()
worksheets("sheet1").PrintOut Copies:=1, Collate:=True
End Sub

Casper wrote:

Hi please help
I want to put a button onto a excel spreadsheet (not the toolbar) that will
print a report for me from another sheet, what macro do I use and what
options do I use
Regards
Casper


--

Dave Peterson

keithl816


Hi Casper,

Try going to design mode in your toolbar and clicking on the command
button icon place it on the sheet desired then right click the button,
click view code and try placing the code below.

I set this up as sheet 2 being the one printed, change as needed. The
same will go for the print range.


Code:
--------------------

Sub CommandButton1_Click()
Application.ScreenUpdating = False
Sheets("sheet2").Visible = True
Sheets("sheet2").Select

ActiveSheet.PageSetup.PrintArea = "$A$1:$I$508"
ActiveWindow.SelectedSheets.PrintOut copies:=1, collate:=True
Sheets("sheet2").Visible = True
Application.ScreenUpdating = True

End Sub

--------------------


Hope this helps


--
keithl816
------------------------------------------------------------------------
keithl816's Profile: http://www.excelforum.com/member.php...o&userid=21287
View this thread: http://www.excelforum.com/showthread...hreadid=390798



All times are GMT +1. The time now is 04:24 AM.

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