title: Unable to get data as tabular format
body: <p>I've written a script in vba using IE to get the data from a webpage. The data are not stored within any table, I meant there is no <code>table</code>,<code>tr</code> or <code>td</code> tag. However, they look like to be in a tabular format. You can see the below image for clarity.</p>
  
  <p>What I've tried so far can get the data in a single line like:</p>
  
  <pre><code>$4,085  
  $1,620
  $1,435  
  $35
  $1,125  
  $905
  </code></pre>
  
  <p>How I wish to get them is like:</p>
  
  <pre><code>$4,085  $1,620
  $1,435  $35
  $1,125  $905
  </code></pre>
  
  <p>In other languages there is an option for <code>list comprehension</code> using which I can handle it in a single line of code but in case of vba I get stuck.</p>
  
  <p><code>html elements</code> within which the data are (It's just a chunk of the whole):</p>
  
  <pre><code>&lt;ul id="tco_detail_data"&gt;
      &lt;li&gt;
          &lt;ul class="list-title"&gt;
              &lt;li class="first"&gt;&amp;nbsp;&lt;/li&gt;
              &lt;li&gt;Year 1&lt;/li&gt;
              &lt;li&gt;Year 2&lt;/li&gt;
              &lt;li&gt;Year 3&lt;/li&gt;
              &lt;li&gt;Year 4&lt;/li&gt;
              &lt;li&gt;Year 5&lt;/li&gt;
              &lt;li class="last"&gt;5 Yr Total&lt;/li&gt;
          &lt;/ul&gt;
      &lt;/li&gt;
      &lt;hr class="loose-dotted"&gt;
  
  
      &lt;li class="first"&gt;
          &lt;ul class="first"&gt;
              &lt;li class="first"&gt;Depreciation&lt;/li&gt;
                          &lt;li&gt;$4,085&lt;/li&gt;
                          &lt;li&gt;$1,620&lt;/li&gt;
                          &lt;li&gt;$1,425&lt;/li&gt;
                          &lt;li&gt;$1,263&lt;/li&gt;
                          &lt;li&gt;$1,133&lt;/li&gt;
                      &lt;li class="last"&gt;$9,526&lt;/li&gt;
          &lt;/ul&gt;
      &lt;/li&gt;
  &lt;/ul&gt;
  </code></pre>
  
  <p>The data look like in that page:</p>
  
  <p><a href="https://i.stack.imgur.com/3XRaB.jpg" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/3XRaB.jpg" alt="enter image description here"></a></p>
  
  <p>This is what I've attempted so far:</p>
  
  <pre><code>Sub Get_Information()
      Dim IE As New InternetExplorer, HTML As HTMLDocument
      Dim post As Object
  
      With IE
          .Visible = False
          .Navigate "https://www.edmunds.com/ford/escape/2017/cost-to-own/?zip=43215"
          While .Busy = True Or .ReadyState &lt; 4: DoEvents: Wend
          Set HTML = .Document
      End With
  
      Application.Wait Now + TimeValue("00:00:05") 'waiting for the items to be available
  
      For Each post In HTML.getElementById("tco_detail_data").getElementsByTagName("li")
          Debug.Print post.innerText
      Next post
      IE.Quit
  End Sub
  </code></pre>
  
  <p>Reference to add to the library to execute the above script:</p>
  
  <pre><code>Microsoft Internet Controls
  Microsoft HTML Object Library
  </code></pre>