Printing
 

Is there any way of getting my computer to automatically print a work
sheet everyday?

James


--
smith.james0
------------------------------------------------------------------------
smith.james0's Profile: http://www.excelforum.com/member.php...o&userid=16230
View this thread: http://www.excelforum.com/showthread...hreadid=382078

"smith.james0" wrote:


Is there any way of getting my computer to automatically print a work
sheet everyday?

Have a look at Scheduled Tasks in Control Panel

I have got it to open the file. I just don't know how to get it to print
:confused:


--
smith.james0
------------------------------------------------------------------------
smith.james0's Profile: http://www.excelforum.com/member.php...o&userid=16230
View this thread: http://www.excelforum.com/showthread...hreadid=382078

this will automatically print the excel sheet whenever the excel
workbook is opened, you to copy this code in "this workbook" at vba
editor, save it and close it.Now whenever the file is opened, it
prints.


Private Sub Workbook_Open()
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End Sub


--
anilsolipuram
------------------------------------------------------------------------
anilsolipuram's Profile: http://www.excelforum.com/member.php...o&userid=16271
View this thread: http://www.excelforum.com/showthread...hreadid=382078

Do i click on the work sheet i want to print, as there is six sheets
containing about 50 ish pages :) I only need to print work sheet 6


--
smith.james0
------------------------------------------------------------------------
smith.james0's Profile: http://www.excelforum.com/member.php...o&userid=16230
View this thread: http://www.excelforum.com/showthread...hreadid=382078

I am assuming that Sheet6 is the name of sheet 6, change the name if it
is different than that.

you have to copy this code in "this workbook" at vba editor, save it
and close it.Now whenever the file is opened, it prints sheet6.



Private Sub Workbook_Open()
Sheets("Sheet6").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1
end sub


--
anilsolipuram
------------------------------------------------------------------------
anilsolipuram's Profile: http://www.excelforum.com/member.php...o&userid=16271
View this thread: http://www.excelforum.com/showthread...hreadid=382078

Thankyou :) :) :) :)


--
smith.james0
------------------------------------------------------------------------
smith.james0's Profile: http://www.excelforum.com/member.php...o&userid=16230
View this thread: http://www.excelforum.com/showthread...hreadid=382078

also try
(Sheet6 is supposed to be the VBA name of the sheet, this way you can
change the name of the sheet)

Private Sub Workbook_Open()
Sheet6.PrintOut Copies:=1
end sub