retrieve data from web

[mamuka34]

Hi,
I have problem to write macro
I want to retrieve data from web. can anyone help me with this?
please........

 

[Don Guillett]

data>import external data>new >put your url in the address line>pick tables
(or whole page)>import

 

[minimaster]

VBA demo for importing a webpage into Excel
(This will import this discussion into Excel. Not very pretty, but
good enough to extract any desired data out of the imported web page)

Private Sub Webpageimportexample()
Dim uri As String
Dim ws As Worksheet
uri = "URL;" & "http://groups.google.com/group/
microsoft.public.excel.programming/browse_thread/thread/
f39346eab6de8d55?hl=en"
Err.Clear
Set ws = Worksheets.Add
With ws.QueryTables.Add(Connection:=uri,
Destination:=ws.Range("A1"))
.Refresh (False)
End With
err_num = Err.Number
If err_num <> 0 Then
If err_num = 1004 Then
x = MsgBox("no connection", vbCritical, "web page
retrieval")
Else
x = MsgBox("Error while updating: " + CStr(err_num),
vbCritical, "web page retrieval")
End If
End If
End Sub