Deselect (Unselect) Cells
I know of no version of Excel that allows you to de-select a cell by re-clicking
in the manner you describe.
Once selected with CTRL + Click, the cells are selected.
Chip Pearson has code to allow de-selecting cells or ranges.
Sub UnSelectActiveCell()
Dim Rng As Range
Dim FullRange As Range
'Chip Pearson
If Selection.Cells.Count 1 Then
For Each Rng In Selection.Cells
If Rng.Address < ActiveCell.Address Then
If FullRange Is Nothing Then
Set FullRange = Rng
Else
Set FullRange = Application.Union(FullRange, Rng)
End If
End If
Next Rng
If FullRange.Cells.Count 0 Then
FullRange.Select
End If
End If
End Sub
Sub UnSelectActiveArea()
'Chip Pearson
Dim Rng As Range
Dim FullRange As Range
Dim Ndx As Integer
If Selection.Areas.Count 1 Then
For Each Rng In Selection.Areas
If Application.Intersect(ActiveCell, Rng) Is Nothing Then
If FullRange Is Nothing Then
Set FullRange = Rng
Else
Set FullRange = Application.Union(FullRange, Rng)
End If
End If
Next Rng
FullRange.Select
End If
End Sub
Gord Dibben MS Excel MVP
On Fri, 10 Aug 2007 14:56:01 -0700, gtabmx
wrote:
I have used Excel for a very long time and was used to the way cell selection
was managed. For example, If I used CTRL to select 5 different cells and
then wanted to deselect one of them, I could just reclick it while holing
CTRL. However, now in Excel 2007 if I select a cell by mistake and want to
deselect it rather than restart my whole selection process, I cannot. Can
someone please tell me how to deselect a cell if it is selected. If this is
an impossible task then I, for one, am speachless.
Mike
|