Hi
try this in module of worksheet
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(0, 0) = "Y2" Then Application.Calculation = xlAutomatic Else: Application.Calculation = xlManual End If End Sub
Hi
try this in module of worksheet
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(0, 0) = "Y2" Then Application.Calculation = xlAutomatic Else: Application.Calculation = xlManual End If End Sub
Regards
tom1977
If You are satisfied with my solution click the small star icon on the left to say thanks.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks