Need help with offset sort function

[Cliff L]

I have used some code that was established on a previous question concerning
sorts and it works great except for the following:
ActiveCell.Offset(0, 12).Insert shift:=xlDown. This will only shift down
one column and I need it to shift a series of columns down. I know it is
prbably something simple and I know just enough to make me very dangerous,
but can someone help me?

[Bob Phillips]

ActiveCell.Offset(0, 12).Resize(,n).Insert shift:=xlDown

where n is the number of columns

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Cliff L" <[email protected]> wrote in message
news:[email protected]...
> I have used some code that was established on a previous question
concerning
> sorts and it works great except for the following:
> ActiveCell.Offset(0, 12).Insert shift:=xlDown. This will only shift down
> one column and I need it to shift a series of columns down. I know it is
> prbably something simple and I know just enough to make me very dangerous,
> but can someone help me?

[Cliff L]

Thanks Bob it works great!

"Bob Phillips" wrote:

> ActiveCell.Offset(0, 12).Resize(,n).Insert shift:=xlDown
>
> where n is the number of columns
>
> --
>
> HTH
>
> RP
> (remove nothere from the email address if mailing direct)
>
>
> "Cliff L" <[email protected]> wrote in message
> news:[email protected]...
> > I have used some code that was established on a previous question
> concerning
> > sorts and it works great except for the following:
> > ActiveCell.Offset(0, 12).Insert shift:=xlDown. This will only shift down
> > one column and I need it to shift a series of columns down. I know it is
> > prbably something simple and I know just enough to make me very dangerous,
> > but can someone help me?
>
>
>