Scanning QR

Private bot As New Selenium.ChromeDriver

Sub Test()
    Const NO_JS_PROFILE As String = "C:\Users\Future\AppData\Local\Google\Chrome\User Data\Profile 1"
    Const JS_PROFILE As String = "C:\Users\Future\AppData\Local\Google\Chrome\User Data\Default"
    Set bot = New ChromeDriver
    With bot
        .SetProfile JS_PROFILE, True
        .Get "https://web.whatsapp.com/send?phone=96599699550"
        Stop
        .Quit
    End With
End Sub