both Please advise,

I am trying to add columns as per the following code:

Columns("B:B").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove

When i check the worksheet, columns A and B have been selected,

If I run the following code:

Columns("C:C").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove

only Column C is selected.

Can anyone help?

I didn't start xl2007, but different versions of excel treat merged cells
differently.

Do you have any cells in A:B that are merged?

AndyJ wrote:
>
> both Please advise,
>
> I am trying to add columns as per the following code:
>
> Columns("B:B").Select
> Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
>
> When i check the worksheet, columns A and B have been selected,
>
> If I run the following code:
>
> Columns("C:C").Select
> Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
>
> only Column C is selected.
>
> Can anyone help?

--

Dave Peterson

Cheers Dave,

I didnt consider that!.

I have been writing in VB.NET and not VBA for the last couple of years and
have forgotten some simple checks.

Thanks for your help.


"Dave Peterson" wrote:

> I didn't start xl2007, but different versions of excel treat merged cells
> differently.
>
> Do you have any cells in A:B that are merged?
>
> AndyJ wrote:
> >
> > both Please advise,
> >
> > I am trying to add columns as per the following code:
> >
> > Columns("B:B").Select
> > Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
> >
> > When i check the worksheet, columns A and B have been selected,
> >
> > If I run the following code:
> >
> > Columns("C:C").Select
> > Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
> >
> > only Column C is selected.
> >
> > Can anyone help?
>
> --
>
> Dave Peterson
>