View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
T De Villiers[_63_] T De Villiers[_63_] is offline
external usenet poster
 
Posts: 1
Default Multiple Criteria - Shortening Code


following is my code:

For i = 100 to 1

If cells(1,i) < "GM" AND If cells(1,i) < "tURNOVER" AND If cells(1,i)
< "cONTRIBUTION" AND............Then
Selection.EntireColumn.Delete

There are 15 criteria, how do I shorten my code, maybe using an array?
not sure.

Thanks


--
T De Villiers
------------------------------------------------------------------------
T De Villiers's Profile: http://www.excelforum.com/member.php...o&userid=26479
View this thread: http://www.excelforum.com/showthread...hreadid=566269