Shortening my code

Needsomehelp10

New Member
Joined
Sep 5, 2017
Messages
18
Hey guys,

Is there a way to shorten the following code so that I do not have to write or Range ("A1") = every time I wanna add an or statement? Thanks for the help in advance.

ElseIf Range("A1") = "Location 1" Or Range("A1") = "Location 2" Or Range("A1") = "Location 4" Or Range("A1") = "Location 5" Or Range("A1") = "Location 6" Or Range("A1") = "Location 7" Then do blah blah
 

Some videos you may like

Excel Facts

Quick Sum
Select a range of cells. The total appears in bottom right of Excel screen. Right-click total to add Max, Min, Count, Average.

Jonmo1

MrExcel MVP
Joined
Oct 12, 2006
Messages
44,061
Just going to put this out there.

Shorter does NOT mean Better.
Don't change code 'just to make it shorter'


Anyway..

You can use a Select Case structure..

Code:
Select Case Range("A1").Value
    Case "Location 1", "Location 2", "Location 4", "etc."
        blah blah
End Select
 

Rick Rothstein

MrExcel MVP
Joined
Apr 18, 2011
Messages
36,680
Office Version
  1. 2010
Platform
  1. Windows
Shorter does NOT mean Better.
Don't change code 'just to make it shorter'

Anyway..

You can use a Select Case structure..
Code:
Select Case Range("A1").Value
    Case "Location 1", "Location 2", "Location 4", "etc."
        blah blah
End Select
Look at that, you made it shorter... and better. :devilish:
 

Watch MrExcel Video

Forum statistics

Threads
1,122,499
Messages
5,596,517
Members
414,074
Latest member
Matthew Kakde

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top