Saving current worksheet on cell value change

S

scotty

Let's say I want the current worksheet to save when the value changes in cell
b15 or b45 or e15, etc. How can I get this done.

Thanks.
 
J

JE McGimpsey

one way:

Put this in your worksheet code module (right-click the worksheet tab
and choose View Code):

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("B15,B45,E15")) Is Nothing Then _
ThisWorkbook.Save
End Sub
 
Top