Excel VBA在firefox / chrome的新标签中打开网站

我正在使用SHELLfunction打开网站。 星期三列出星期三的地址。我的代码正在工作,但网站在Chrome和Firefox中作为新窗口打开。 代码如何使网站在标签页中打开?

更新 – 下面是简单的代码。 它适用于Chrome,但不适用于Firefox

Sub firefoxtabs() Dim Website As String Dim exepath As String Dim i As Integer 'exepath = "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe -url " 'open in chrome exepath = "C:\Program Files (x86)\Mozilla Firefox\firefox.exe" 'open in firefox For i = 1 To 3 Website = Cells(i, 1).Value 'Shell (exepath & Website) 'for chorme Shell (exepath & " -new-tab " & Website) 'for firefox Next End Sub 

对于Firefox,试试这个: firefox -new-tab $url

对于Chrome,只需: chrome $url