[[email protected]]

In a table where I have a cell selected I want to select the cell to
the right of it, including the start cell. In the end I need to have
both cells selected at the same time using the start cell as the
source position.

Why?

It's a pivot table. The start cell has a multiple of cells to the
right of it. I need to select that source cell (easy) and the 1-n
cells to the right of that start cell.

ie the start cell takes up one large cell over four rows, to it's
right are four smaller cells.


Thanks,


Christian

[Lene Fredborg]

The following code lines may do what you want:

With Selection
'Include the first cell to the right in the selection
.MoveRight unit:=wdCharacter, Count:=2, Extend:=wdExtend
'Extend selection to include the 3 cells below
.MoveDown unit:=wdLine, Count:=3, Extend:=wdExtend
End With

The code will only result in the correct selection under the conditions you
described, i.e. you select (or just click in) a single cell and the height of
that cell spans 4 cells to the right.

--
Regards
Lene Fredborg
DocTools - Denmark
www.thedoctools.com
Document automation - add-ins, macros and templates for Microsoft Word


" wrote:

In a table where I have a cell selected I want to select the cell to
the right of it, including the start cell. In the end I need to have
both cells selected at the same time using the start cell as the
source position.

Why?

It's a pivot table. The start cell has a multiple of cells to the
right of it. I need to select that source cell (easy) and the 1-n
cells to the right of that start cell.

ie the start cell takes up one large cell over four rows, to it's
right are four smaller cells.


Thanks,


Christian

[[email protected]]

On Jul 16, 3:34 pm, Lene Fredborg
wrote:
The following code lines may do what you want:

With Selection
'Include the first cell to the right in the selection
.MoveRight unit:=wdCharacter, Count:=2, Extend:=wdExtend
'Extend selection to include the 3 cells below
.MoveDown unit:=wdLine, Count:=3, Extend:=wdExtend
End With

The code will only result in the correct selection under the conditions you
described, i.e. you select (or just click in) a single cell and the height of
that cell spans 4 cells to the right.

Hey,

Thanks for the response. I had seen those functions (moveright and
movedown) but like you said, I'd need to know the number of cells each
time. For a table with variable numbers of cells, I'd need to have the
number of cells each handy (which I don't).

In this situation I had a pivot table from Access I copied over to
word then wanted to do some conditional formatting on it.

The easier solution was to have a copy of the column I needed to cue
off (the one side of the one to many) positioned on the many side as
well (now showing redundant values per line). This allowed me to
format row per row as needed, then after I just deleted that column
from the table.

Looks very nice

Christian