In my script, I delete two columns one by one using the following
two lines of code:

.Columns(1).EntireColumn.Delete
.Columns(1).EntireColumn.Delete

Can one command do the job instead of two? Thanks.

..Columns(1).Resize(,2).EntireColumn.Delete

--
Regards,
Tom Ogilvy


"John Smith" <(E-Mail Removed)> wrote in message
news:erI9P$V%(E-Mail Removed)...
> In my script, I delete two columns one by one using the following
> two lines of code:
>
> .Columns(1).EntireColumn.Delete
> .Columns(1).EntireColumn.Delete
>
> Can one command do the job instead of two? Thanks.

All of these work and there are more available...
Columns("A:B").Delete
Range("A1:B1").EntireColumn.Delete
Range(Columns(1), Columns(2)).Delete
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware


"John Smith"
<(E-Mail Removed)>
wrote in message
two lines of code:
.Columns(1).EntireColumn.Delete
.Columns(1).EntireColumn.Delete
Can one command do the job instead of two? Thanks.