title: How to iterate through a string and check the byte value of every character?
body: <p>Code I have:</p>
  
  <pre><code>cell_val = CStr(Nz(fld.value, ""))
  Dim iter As Long
  For iter = 0 To Len(cell_val) - 1 Step 1
      If Asc(Mid(cell_val, iter, 1)) &gt; 127 Then
          addlog "Export contains ascii character &gt; 127"
      End If
  Next iter
  </code></pre>
  
  <p>This code doesn't work. Anyone know how to do this? I've simply got no idea with VB or VBA.</p>