Download and import csv

[excelcandy]

Is it possible to automatically download and import a CSV sheet from a website url (http://example.com/file.csv) ?

[patel45]

Sub GettData()
Set sh = ActiveSheet
link1 = "http://http://example.com/file.csv"
Set wb = Workbooks.Open(link1)
Sheets(1).Copy After:=sh
wb.Close
End Sub