Forum Discussion
Automatically print when cells value change
Hi all
Is there any why to Automatically print when cells value change ?
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 RangeSet KeyCells = Range("A1:C10")
If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing ThenActiveWorkbook.PrintOut
End If
End Sub- If the active range changes by a formula, then there is no trigger, how can we fix that?
