I have this simple code in my sheet and I would like to include 2 cells that are "AJ10" and "AJ13" My skills are limited and I have been searching for a solution but nothing seem to be working
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Count = 1 Then
'change the range to what you want
If Not Intersect(Target, Range("B25:B54")) Is Nothing Then
'alternates cells between 1 and 0. If you want to change it to something else then replace the 1 and 0 with your alternatives
If Selection = 1 Then
Selection = 0
Else
Selection = 1
End If
End If
End If
End Sub
Thanks for any help in advance !!
Bookmarks