Recently, I created a straightforward piece of code to log into Gmail using Excel VBA. Here's what it looks like:
Sub signInToGmail()
Dim bot As New WebDriver
Dim i As Integer
bot.Start "chrome", ""
bot.Wait 3000
bot.FindElementById("form-username").SendKeys ("my email")
bot.Wait 3000
bot.FindElementById("form-password").SendKeys ("my password")
bot.Wait 3000
bot.FindElementById("login-btn").Click
bot.Wait 2000
End Sub
This method functions correctly. However, each time the code is executed, a new browser window opens, and any previous browsing history is lost. Additionally, the user must enter their login credentials every time.
As an alternative approach, I modified the code as follows:
Sub automatedLogin()
Dim browser As New WebDriver
Dim i As Integer
Dim chromePath As String
chromePath = """C:\Program Files\Google\Chrome\Application\chrome.exe"""
browser.Wait 3000
browser.FindElementById("form-username").SendKeys ("my mail")
browser.Wait 3000
browser.FindElementById("form-password").SendKeys ("my password")
browser.Wait 3000
browser.FindElementById("login-btn").Click
browser.Wait 2000
End Sub
With this updated code, Chrome opens with saved login information. However, there seems to be an issue with sending keys using this method, resulting in an error message being displayed (see image below). Any advice on how to resolve this would be greatly appreciated. Thank you.
[enter image description here] 1