Automatically print when cells value change

[beikme]

Hi all

Is there any why to Automatically print when cells value change ?

[#2]

Hi @beikme,

The below Macro will should do what you want.

Just change the 3rd line to what ever range you want to trigger the print job. "Set KeyCells = Range("A1:C10")"

If you want to print the active sheet and not the entire workbook, change the 6th line to: Activesheet.PrintOut

Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range

Set KeyCells = Range("A1:C10")

If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then

ActiveWorkbook.PrintOut

End If
End Sub

[#3]

perfect it works thank you for that 

one more thing 

How can i get it when its scan slp in cell  1 to go to sn cell 2 and after go back to slp cell one 

@Bennadeau 

[#4]

@beikme 

Not sure I understand your question here. 

[#5]

If the active range changes by a formula, then there is no trigger, how can we fix that?