title: Excel VBA - using SELECT CASE but now need an array
body: <p>I've currently got the code below.  There can only currently be seven values for "ins" and so the code suffices, however as of next month I have been told that there will be over 900 values!</p>
  
  <p>I assume that rather than writing another 900 case statements I could use an array of some sort.  Can anyone give me a nudge in the right direction?</p>
  
  <pre><code>Private Sub test()
  Dim i As Long
  Dim lr As Long
  Dim ins As String
  
  lr = Range("A" &amp; Rows.Count).End(xlUp).Row
  
  For i = 6 To lr
  Select Case Cells(i, 20)
      Case Is = "" 
          ins = Mid(Cells(i, 11), 14, 2)
              Select Case Cells(i, 10)
                  Case "Inx", "ComInx"
                       Select Case Cells(i, 9)
                           Case "EINX"
                                Select Case ins
                                    Case "LD"
                                        Cells(i, 9).Value = "SR"
                                    Case "GP"
                                        Cells(i, 9).Value = "GAMA"
                                    Case "AV"
                                        Cells(i, 9).Value = "NU"
                                    Case "AX"
                                        Cells(i, 9).Value = "AXC"
                                    Case "MZ"
                                        Cells(i, 9).Value = "MZE"
                                    Case "AD"
                                        Cells(i, 9).Value = "AGD"
                                    Case "AG"
                                        Cells(i, 9).Value = "AG"
                                End Select
                       End Select
              End Select
  End Select
  Next
  
  End Sub
  </code></pre>