title: Assign a value to a variable from a prefixed list of variables
body: <p>I have a problem assigning to a variable a value from a prefixed list.
  I'm going to explain better. In the "Module8" I put the following varibles with constant values:</p>
  
  <pre><code>Public Const Europe = 0.12, _
  Middle_East= 0.12, _
  Africa = 0.185
  </code></pre>
  
  <p>that should be visible also to other modules. In the "Module5" I have the following lines:</p>
  
  <pre><code>Sub CalcPop()
  
  Sheets("Region").Select
  
  Data = Range("I7:I15").Value
  Geo_Region = Data(1, 1)
  Population = Data(3, 1)
  Extension = Data(4, 1)
  S = Data(7, 1)
  
  S = S * (1 - Geo_Region)
  </code></pre>
  
  <p>Now the code present in the "Module5" reads the Sheet called "Region" in which are present the regions (i.e. Europe, Africa, etc.) as strings, so the variable "Geo_Region" is valorized as Europe, Africa, etc.
  The problem is that when it comes at the line S = S * (1 - Geo_Region), it gives me the run-time error '13' "Type Mismatch". I guess because the code read the strings in the sheet, but it is not able to associate the string to the values present in the public constants that are in the "Module8".
  Could you suggest me on how to proceed in order to associate the value present in the public list with the string in the sheet?</p>
  
  <p>Thank you in advance!</p>