The code must go into the worksheet code module.![]()
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub If Not Intersect(Target, Range("A1:A3")) Is Nothing Then Range("A4").ClearContents End If End Sub
Right-click the tab of the target worksheet, choose View Code then copy and paste the above code into the code pane.
Close the VB Editor.
Anytime a change is made to cell A1:A3, cell A4 will be cleared.
Bookmarks