Excel VBA Pull Data From A Website

The website has changed since I originally made this video. The state appears to have been removed but you can still get the city and county at least. Change the code from what I say in the video to this:
Dim sDD as string
sDD = Trim(Doc.getElementsByTagName(“dd”)(0).innerText)
sDD = split(sDD,VbNewLine)(0)
Range(“city”).Value = Split(sDD,”, “)(0)
Range(“county”).Value = Split(sDD,”, “)(1)

A tutorial showing how to pull data from a website. In this tutorial I make a zip lookup that pulls in the city, state and county based on a given zip code. Since posterous closed: http://brettdotnet.wordpress.com/2012/04/20/excel-vba-pull-data-from-a-website-update/

source