Блог

Вот мой код VBA

 Sub addExtensionTChrome()  Dim driver As New WebDriver, dlg As Alert  driver.AddArgument "start-maximized"  driver.Start "chrome" driver.Get "https://chrome.google.com/webstore/detail/whatfont/jabopobgcpjmedljpbcaablpmlmfcogm"  driver.Wait 2000  driver.FindElementByXPath("/html/body/div[4]/div[2]/div/div/div[2]/div[2]/div/div/div/div").Click  driver.Wait 2000  Set dlg = driver.SwitchToAlert   End Sub    

Когда я Запустил Этот Код, Возникла Ошибка Со словами

NoAlertPresentError

Вот скриншот ошибки

Как предупреждение присутствует в Chrome

Смотрите Здесь

Я не знаю, почему возникает эта ошибка, и мне нужно переключиться на Оповещение, чтобы принять это предупреждение, чтобы я мог добавить расширение. Я знаю, что могу загрузить расширение с помощью AddArgument, но по некоторым причинам я должен сделать это таким образом.Если у кого-нибудь есть решение для этого, пожалуйста, поделитесь, я буду очень благодарен.