Emoncada
06-18-2008, 09:14 AM
I have cells B3 & D3 . One being a "YES" the other a "NO".
Is there a way I can have it say if B3 = "a" then D3 = "" & if "D3" = "a" then B3 = ""
I have this code.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Range("B3,B5,B7,B9,B11,D3,D5,D7,D9,D11"), Target) Is Nothing Then
Exit Sub
End If
If Target.Value = "a" Then
Target.Value = ""
Else
Target.Value = "a"
End If
Cancel = True
End Sub
I tried this
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("B3") = "a" Then Range("D3") = ""
If Range("D3") = "a" Then Range("B3") = ""
End Sub
But not working the way I want it to work when B3 = "a" and i double click D3 it stays the same.
Is there a way I can have it say if B3 = "a" then D3 = "" & if "D3" = "a" then B3 = ""
I have this code.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Range("B3,B5,B7,B9,B11,D3,D5,D7,D9,D11"), Target) Is Nothing Then
Exit Sub
End If
If Target.Value = "a" Then
Target.Value = ""
Else
Target.Value = "a"
End If
Cancel = True
End Sub
I tried this
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("B3") = "a" Then Range("D3") = ""
If Range("D3") = "a" Then Range("B3") = ""
End Sub
But not working the way I want it to work when B3 = "a" and i double click D3 it stays the same.