Maybe I was a little to vague. Here is the problem, I have a sheet with 16
cells, 4 by 4, I have 6 cells selected using the control key and clicking.
They are randomly scattered over the 16. I want to invert so that the 6 cells
that were selected are not now and the 10 that were not, are selected. They
are not always next to each other. There is no menu that I can find that will
swap my selection. Is there a hidden menu or combination of keys to do this?

"Gary''s Student" wrote:

I am assuming that you want to move to the right rather than to the left:

Sub movsel()
Set r1 = Selection
Set rf = Nothing
For Each r In r1
If rf Is Nothing Then
Set rf = r.Offset(0, 1)
Else
Set rf = Union(rf, r.Offset(0, 1))
End If
Next
rf.Select
End Sub

if you wanted to move to the left use Offset(0,-1) instead.
--
Gary's Student
gsnu200708


"Jon" wrote:

I have groups of cells scatered at differnt parts of the sheet (saying what
the cell next to it is) selected. How do in invert my selection so that
instade of the "title" cells being selected the "data" cells are? There is no
"invert selection" in the edit menu like there is for other programs.