Auto print comand

[Stevie p]

Hi,
Is there a command for excel to print automatically

 

[VoG]

What exactly do you mean by 'print automatically'?

 

[Datsmart]

If you just want to print the active worksheet:

ActiveSheet.Printout

 

[VoG]

Please reply to your thread instead of using PMs

Hi,
I have a large machine service record sheet. this sheet counts down days to the next scheduled service.
I wondered if it would be possible to auto print the items required and machine due for service. So I could come into the office each morning go to the printer and have the information on hard copy without checking the sheet.

This should be possible using event code. In what range are the day countdown values and what value should trigger printing. Presumably the count down is achieved with a formula.

 

[Stevie p]

Yes simple formula today()-a manual added date. Format set to general. Would like it to print when cell =1 day.

 

[VoG]

You can try this: right click the sheet tab, select View Code and paste in

Private Sub Worksheet_Calculate()
Dim c As Range
For Each c In Range("D2:D200") 'modify the range to suit
    If c.Value = 1 Then
        Me.PrintOut
        Exit For
    End If
Next c
End Sub

Change the range in red to the range where the countdown days are.

This code will run automatically each time the sheet calculates. What I'm not sure of is whether a change in the system date will cause the sheet to recalculate.

 

[Stevie p]

Thankyou,
that superb.