delete two columns at a time

[John Smith]

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.

 

[Tom Ogilvy]

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

 

[Jim Cone]

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"
<[email protected]>
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.