title: Split home address separated with a comma
body: <p>I have about 15 Address that are formatted like, <code>1111 Really Cool Street, Sweet City, Awesome State</code> I need to split them up into separate cells for their Street, City and State.</p>
  
  <p>The problem I have currently is storing the Street,City and State. I've tried something along the lines..</p>
  
  <pre><code>Dim addressArray() As String
  
  posRow = 1
  Do
  posRow = posRow + 1
      addressFromCell= Sheet1.Cells(posRow , "C")
      addressArray() = Split(addressFromCell, ",")
          Sheet2.Cells(posRow , "A") = addressArray(0)
          Sheet2.Cells(posRow , "B") = addressArray(1)
          Sheet2.Cells(posRow , "C") = addressArray(2)
  Loop Until posRow = 15
  </code></pre>
  
  <p>I thought <code>addressArray</code> would look like <code>{"1111 Really Cool Street","Sweet City", "Awesome State"}</code> and I could simply pass in the element I wanted. Instead I keep on getting </p>
  
  <blockquote>
    <p>Run-time error '9': Subscript out of range</p>
  </blockquote>
  
  <p>Any help would be great, thanks!</p>