edge headless mode doesn't work

[mnru]

the code below works well

Sub testChromeHeadlessMode() Dim driver As New WebDriver Dim options As New WebDriverOptions options.BrowserType = Chrome options.ChromeArguments.Add "--headless" driver.Chrome "driver/path" driver.OpenBrowser options Debug.Print "finished" End Sub

but the code below doesn't work

Sub testEdgeHeadlessMode() Dim driver As New WebDriver Dim options As New WebDriverOptions options.BrowserType = Edge options.EdgeArguments.Add "--headless" driver.Edge "driver/path" driver.OpenBrowser options Debug.Print "finished" End Sub

I don't know how to fix this code

[er-ri]

Try the following code if --headless doesn't work.

    Set driver = New WebDriver
    edgeOptions.BrowserType = Edge
    edgeOptions.EdgeArguments.Add "--headless=new"
    driver.Edge "path\to\msedgedriver.exe"
    
    driver.OpenBrowser edgeOptions