如何在vba中使用带有硒的铬选项？

Question

有什么方法可以在我的vba代码中使用那些注释掉的四行，这样我就可以在输入一些易于通知的网页时摆脱障碍。我无法找到任何想法，以便我可以利用它们，因为它因为现在的方式而抛出错误。这里是。提前谢谢。

Sub Test_stth()
Dim driver As New WebDriver

'chrome_options = WebDriver.ChromeOptions()
'prefs = {"profile.default_content_setting_values.notifications" : 2}
'chrome_options.add_experimental_option("prefs",prefs)
'driver = WebDriver.Chrome(chrome_options = chrome_options)

With driver
    .Start "chrome", "https://stackoverflow.com/documentation"
    .get "/documentation"
End With
End Sub

Answer 1

这是你在找什么？

With driver
    .SetPreference "profile.default_content_setting_values.notifications", 2 '1 for allow 2 for block
    .Start "chrome", "https://www.facebook.com"
.
.
.