Excel VBA ERROR - Compile Error, Syntax Error

Question

Hi guys i am trying to follow this https://www.youtube.com/watch?v=Wn9L1MD_y0Y&t=107s on how to automate whatsapp with VBA.

This is the whole code.

Sub WebWhatsApp()

'Activate Selenium Type Library: Tools > Reference

Dim bot As New WebDriver
Dim ks As New Keys

'Init New Chrome instance & navigate to WebWhatsApp
bot.Start "chrome", "http://web.whatsapp.com/"
bot.Get "/"

'Ask user to scan the QR code. Once logged in, continue with macro
MsgBox "Please scan the QR code. After you are logged in, please confirm this message box by clicking"

'Determinate number of messages by identifying the number of last rows in column A
lastrow = Cells(Rows.Count, 1).End(x1Up).Row

'Search phonenumber/name, press enter, paste text into WebWhatsApp, press Enter to send message

For i = 2 To lastrow
    'Get search text (phone number or name) from worksheet
    searchtext = Sheets(1).Range("A" & i).Value

    'Get textmessage from worksheet
    textmessage = Sheets(1).Range("B" & i).Value

    'click in the searchbox"
    bot.FindElementByXPath("//*[@id="side"]/div[1]/div/label/div/div[2]").Click
    
    
    'Wait 500 ms
    bot.Wait (500)

    'Insert search text(phone number or name)
    bot.SendKeys (searchtext)

    'Wait 500 ms
    bot.Wait (500)

    'Press Enter to confirm search text
    bot.SendKeys (ks.Enter)

    'Wait 500 ms
    bot.Wait (500)

    'Load message into WebWhatsApp
    bot.SendKeys (textmessage)

    'Wait 500 ms
    bot.Wait (500)

    'Press Enter to send the message
    bot.SendKeys (ks.Enter)

Next i

'Get notification once done,
MsgBox "Done :)"


End Sub

Apparently i had an error from

    bot.FindElementByXPath("//*[@id="side"]/div[1]/div/label/div/div[2]").Click

It states Compile error : Syntax error

Can Anyone tell me why? I have followed the instructions and codes clearly.

norie · Accepted Answer · 2021-08-28 15:10:57Z

1

The problem is the double quotes around side.

To fix the problem either replace them with single quotes:

    'click in the searchbox"
    bot.FindElementByXPath("//*[@id='side']/div[1]/div/label/div/div[2]").Click

or double them up.

    'click in the searchbox"
    bot.FindElementByXPath("//*[@id=""side""]/div[1]/div/label/div/div[2]").Click

answered Aug 28, 2021 at 15:10

norie

9,9372 gold badges14 silver badges19 bronze badges

Sign up to request clarification or add additional context in comments.

3 Comments

Parfait Over a year ago

What about single quotes? You may have to triple quote or concatenate in parts: "//*[@id=" & """" & "side" & """" & "]/div[1]/div/label/div/div[2]". Feel free to play around as VBA compiles after editing the ine.

kdb014 Over a year ago

okay thanks! Now I have another error. lastrow = Cells(Rows.Count , 1).End(x1UP.Row) There's a Run time error '1004' : Application-defined or object-defined error

norie Over a year ago

It should be End(xlUp).Row not End(x1UP.Row). Note, you can avoid this type of error by adding Option Explicit at the top of the module.

Suraj Rao · Accepted Answer · 2022-09-19 04:55:03Z

0

change to :

//*[@id='side']/div[1]/div/div/div[2]/div/div[2]

edited Sep 19, 2022 at 4:55

Suraj Rao

29.7k11 gold badges96 silver badges104 bronze badges

answered Sep 19, 2022 at 4:29

Andre

1

Collectives™ on Stack Overflow

Excel VBA ERROR - Compile Error, Syntax Error

2 Answers 2

3 Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

3 Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related