Results 1 to 9 of 9

Thread: Import html source of url list in each cell

Hybrid View

Previous Post Previous Post   Next Post Next Post
  1. #1
    any new here? thanks!

  2. #2
    Moderator
    Join Date
    Jul 2012
    Posts
    156
    Rep Power
    14
    Code:
    Sub Test()
        For Each cl In Sheets("Hoja1").Range(Range("E2"), Range("E" & Rows.Count).End(xlUp))
            With CreateObject("MSXML2.XMLHTTP")
                .Open "GET", cl.Value, False
                .Send
                cl.Offset(, 1) = .ResponseText
            End With
        Next
    End Sub

Similar Threads

  1. Replies: 30
    Last Post: 04-15-2019, 07:36 PM
  2. Replies: 1
    Last Post: 05-03-2013, 04:41 PM
  3. Delete List Contain Matching from Second List
    By Rajan_Verma in forum Rajan Verma's Corner
    Replies: 12
    Last Post: 10-07-2012, 07:18 PM
  4. Replies: 2
    Last Post: 04-08-2012, 09:42 AM
  5. Get Chart's Source Data VBA
    By Admin in forum Excel and VBA Tips and Tricks
    Replies: 2
    Last Post: 11-24-2011, 07:54 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •