The vba statement:

ActiveCell.Offset(0, 3).EntireColumn.Select

Works just fine to select the third column to the right of the active
cell.

Is there a nice, clean, simple statement that would select the third
and fourth columns to the right, something like:

ActiveCell.Offset(0, 3:4).EntireColumn.Select

which doesn't work.

I'm basically trying to program a "column move" macro that prompts for
the column(s) to move, and how many column(s) to the right/left to
move it, and then performs the move. Is there one of those already out
there to copy?

Thanks,

Fred Holmes

Hi
ActiveCell.Offset(0, 3).Resize(1,2).EntireColumn.Select

Resize(1,2) leaves the row dimension at 1 and ups the column dimension
to 2.

regards
Paul


On Mar 15, 4:56 pm, Fred Holmes wrote:
The vba statement:

ActiveCell.Offset(0, 3).EntireColumn.Select

Works just fine to select the third column to the right of the active
cell.

Is there a nice, clean, simple statement that would select the third
and fourth columns to the right, something like:

ActiveCell.Offset(0, 3:4).EntireColumn.Select

which doesn't work.

I'm basically trying to program a "column move" macro that prompts for
the column(s) to move, and how many column(s) to the right/left to
move it, and then performs the move. Is there one of those already out
there to copy?

Thanks,

Fred Holmes