Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Allow value in only one of two cells
Hi All........
Having trouble here trying to build a toggle to allow an entry in only one of two cells. Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) If Target.Address = "$K$10" Then Range("k11").Value = "" Range("K10").Value = "CRA" Else End If If Target.Address = "$k$11" Then Range("k10").Value = "" Range("K11").Value = "CRA" Else End If End Sub The first IF works fine, the second one don't work at all. Any help would be appreciated. TIA Vaya con Dios, Chuck, CABGx3 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Allow value in only one of two cells
If Target.Address = "$K$11" Then
the k must be uppercase -- Gary''s Student - gsnu200751 "CLR" wrote: Hi All........ Having trouble here trying to build a toggle to allow an entry in only one of two cells. Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) If Target.Address = "$K$10" Then Range("k11").Value = "" Range("K10").Value = "CRA" Else End If If Target.Address = "$k$11" Then Range("k10").Value = "" Range("K11").Value = "CRA" Else End If End Sub The first IF works fine, the second one don't work at all. Any help would be appreciated. TIA Vaya con Dios, Chuck, CABGx3 |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Allow value in only one of two cells
" Oh for crying out loud!".............
Thank you kind Sir......... Vaya con Dios, Chuck, CABGx3 "Gary''s Student" wrote: If Target.Address = "$K$11" Then the k must be uppercase -- Gary''s Student - gsnu200751 "CLR" wrote: Hi All........ Having trouble here trying to build a toggle to allow an entry in only one of two cells. Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) If Target.Address = "$K$10" Then Range("k11").Value = "" Range("K10").Value = "CRA" Else End If If Target.Address = "$k$11" Then Range("k10").Value = "" Range("K11").Value = "CRA" Else End If End Sub The first IF works fine, the second one don't work at all. Any help would be appreciated. TIA Vaya con Dios, Chuck, CABGx3 |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Allow value in only one of two cells
I like this style to avoid that problem:
If not (intersect(Target, me.range("k10")) is nothing) then CLR wrote: Hi All........ Having trouble here trying to build a toggle to allow an entry in only one of two cells. Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) If Target.Address = "$K$10" Then Range("k11").Value = "" Range("K10").Value = "CRA" Else End If If Target.Address = "$k$11" Then Range("k10").Value = "" Range("K11").Value = "CRA" Else End If End Sub The first IF works fine, the second one don't work at all. Any help would be appreciated. TIA Vaya con Dios, Chuck, CABGx3 -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel: match two cells in one sheet to two cells in another and return a third cells value | Excel Worksheet Functions | |||
compare 2 column cells and return the adjacent columns cells data of the cell | Excel Worksheet Functions | |||
join data in multiple cells when adjoining cells match criteria ?? | Excel Worksheet Functions | |||
display a range of cells editible cells based on matching date | Excel Worksheet Functions | |||
Skip cells with TAB/SHIFT+TAB but allow arrow keys/mouse selection of skipped cells | Excel Programming |