title: Convert an alphanumeric string into an array of numbers in VBA
body: <p>I've been trying to convert a cell in VBA which is like this:</p>
  
  <blockquote>
    <p>I am 99 years old and I was born in 1918.</p>
  </blockquote>
  
  <p>Into an array that would contain and display on the cell as:</p>
  
  <blockquote>
    <p>[99,1918]</p>
  </blockquote>
  
  <p>Here is my code:</p>
  
  <pre><code>Sub ConvertColumnToArray(Length As Integer)
      Dim i As Integer, infoArray As Variant
      Set Column = Sheets("Short Desc")
      For i = 2 To Length
          infoArray = StringToIntArray(Column.Range("A" &amp; i))
          Column.Range("A" &amp; i) = "[" &amp; infoArray(0) &amp; "," &amp; infoArray(1) &amp; "]"
      End For
  End Sub
  
  Function StringToIntArray(str As String) As Variant
      'the code to add
  End Function
  </code></pre>