auto print and close

[kemperohlmeyer]

Do anyone have some code that will automatically print and close a spreadsheet when it is opened?

background: we are performing a data integration on our database. Part of our program is able to open external documents and programs. We want to have our prog point to an excel file, open it (that's the part we can do) and then, once opened (and without external prompting), prints and closes the spreadsheet.

Any code would be great--especially regarding how the macro could automatically run. Thanks.

ko

 

[Joe4]

You can put a macro in the Workbook_Open event which will automatically run when the file is opened. Note that depending on your security settings, it may prompt you to enable the macros first, though.

Place this is the ThisWorkbook module of the workbook in the VB Editor:

Private Sub Workbook_Open()
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
    ActiveWorkbook.Close
End Sub

This is Workbook_Open event is known as an Event Procedure, which is VBA code that is automatically triggered by some event. For more on Event Procedures, check out: http://www.cpearson.com/excel/events.htm