[RESOLVED] Getting Web Page data into Excel

[Siddharth Rout]

Here is an example

Option Explicit

Sub Sample()
    Dim IE As Object
    
    Set IE = CreateObject("InternetExplorer.Application")
    
    With IE
        .Visible = True
        .Navigate "Google.Com"
        Do Until .ReadyState = 4: DoEvents: Loop
        
        Range("A1").Value = IE.Document.documentElement.innerhtml
        .Quit
    End With
End Sub