I have been searching for an answer but I have come up short. I have this code below to take me to a webpage, but I cannot figure out how to click on the link i want. I have to go through this method because the link on the webpage exports the document to excel.
Code:
Public Sub launch_site()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.application")
IE.Visible = True
IE.Navigate "WEBPAGE HERE"
Do Until IE.ReadyState = 4
Loop
AppActivate "Internet Explorer", True
SendKeys "USERNAME", True
Do Until IE.ReadyState = 4
Loop
SendKeys "{TAB}", True
SendKeys "PASSWORD", True
Do Until IE.ReadyState = 4
Loop
SendKeys "~", True
Do Until IE.ReadyState = 4
Loop
IE.Document.All("HYPERLINK HERE").Click
End Sub