У меня есть следующий код для вставки моего имени пользователя, который отлично подходит для другого сайта. Почему это не переводится на сайт в моем коде ниже?
Sub Login_Alb()
Dim IE As Object, html As Object
Const USERNAME = "Confidential"
Set IE = CreateObject("internetexplorer.application")
With IE
.Visible = True
.navigate "https://www3.mainaccount.com/ca/"
While .Busy = True Or .readyState < 4: DoEvents: Wend
Set html = .document
html.querySelector("#userName").innerText = USERNAME
End With
End Sub