title: Evaluate Excel VBA boolean condition (not a formula)
body: <p>I have text in a cell <strong>A1</strong> as below</p>
  
  <pre><code>((True And False Or True) And (True And (Not True))) And (False Or True)
  </code></pre>
  
  <p>I need to evaluate this text and put Boolean result (True / False) in another cell <strong>B1</strong> using <strong>VBA code</strong>.</p>
  
  <p>I tried to use Evaluate function, it is not working.</p>
  
  <p>When I read this cell, it always return string type with double quote enclose in both side. Hence it is treated as string and not evaluating the Boolean expression.</p>
  
  <pre><code>"((True And True Or True) And (True And (True))) And (True Or True)"
  </code></pre>
  
  <p>I want to write this way, but it is not working</p>
  
  <pre><code>If Range("A1").Value = True Then
      Range("B1").Value = True
  Else
      Range("B1").Value = False
  End If
  </code></pre>
  
  <p>I tried to store in Boolean variable also</p>
  
  <pre><code>Dim Result as Boolean
  Result = CBool(Range("A1").Value) 
  </code></pre>
  
  <p>as it is string, I am getting type mismatch when I tried to convert using CBool.</p>