Sub getdata()<code style="margin: 0px; padding: 0px; font-style: inherit; font-weight: inherit; line-height: 12px;">
Dim ie As New InternetExplorer
ie.Visible = True
ie.navigate "https://app.scheduleonce.com/Home.aspx"
With ie
While .Busy Or .readyState <> READYSTATE_COMPLETE: DoEvents: Wend...