Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
cell value
hi,
code is in worksheet selectionchange event. only want the code to run if ONLY 1 cell is clicked, not a range of more than more than 1 cell. currently have: If Not Intersect(Target, Range("DATES_range")) Is Nothing Then Dim selected_date1 As String selected_date1 = Range(Target.Address).Value thanks in advance, geebee |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
cell value
Hello Geebee
If Target.Cells.Count 1 Then Exit Sub -- Regards, OssieMac "geebee" wrote: hi, code is in worksheet selectionchange event. only want the code to run if ONLY 1 cell is clicked, not a range of more than more than 1 cell. currently have: If Not Intersect(Target, Range("DATES_range")) Is Nothing Then Dim selected_date1 As String selected_date1 = Range(Target.Address).Value thanks in advance, geebee |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
cell value
Hi
Inset this line before the code you posted: If Target.Cells.Count 1 then Exit Sub Regards, Per On 5 Aug., 00:19, geebee (noSPAMs) wrote: hi, code is in worksheet selectionchange event. *only want the code to run if ONLY 1 cell is clicked, not a range of more than more than 1 cell. *currently have: If Not Intersect(Target, Range("DATES_range")) Is Nothing Then Dim selected_date1 As String selected_date1 = Range(Target.Address).Value thanks in advance, geebee |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Code to copy the formulae of one cell to all the cell in the rangewith the specific cell and columnnumber changing Options | Excel Discussion (Misc queries) | |||
Populate a cell if values in cell 1 and cell 2 match cell 3 and 4 | Excel Worksheet Functions | |||
Populate a cell if values in cell 1 and cell 2 match cell 3 and 4 | Excel Programming | |||
NEED VBA TO SELECT A CELL; NOTE THE CELL VALUE;COPYADJ CELL;FIND CELL VALUE IN A RANGE AND SO ON | Excel Programming | |||
How to create/run "cell A equals Cell B put Cell C info in Cell D | Excel Discussion (Misc queries) |