使用Excel VBA在Chrome的1选项卡中打开URL

我正在尝试使用下面的代码在Chrome的同一个选项卡中一个接一个地打开各种链接，延迟2分钟。但每次我执行时，它都会在Chrome的一个新选项卡中打开

Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal Milliseconds As LongPtr)

Sub openGenericURL()

Dim genericURL As String
Dim shellURL As String
Dim browser As Variant
Dim sSleep As Variant


        sSleep = Sheet1.Range("G2")  'Set to 2 minutes

        For i = 2 To 5
            genericURL = Sheet1.Cells(i, 12)    'Reading From Excel Cells
            Debug.Print genericURL
            shellURL = "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe -url " & genericURL
            browser = Shell(shellURL, vbMaximizedFocus)

            If i <> 5 Then
                Sleep (sSleep)
            End If
        Next i

End Sub

Public声明PtrSafe子睡眠库“kernel32”（ByVal毫秒为LongPtr）
子openGenericURL（）
Dim genericURL作为字符串
将URL设置为字符串
Dim浏览器作为变体
Dim sSleep作为变体
sSleep=Sheet1。范围（“G2”）设置为2分钟
对于i=2到5
genericURL=Sheet1.Cells（i，12）'从Excel单元格读取
Debug.Print genericURL
shellURL=“C:\ProgramFiles（x86）\Google\Chrome\Application\Chrome.exe-url”&genericURL
browser=Shell（shellURL，vbMaximizedFocus）
如果我5岁
睡眠（sSleep）
如果结束
接下来我
端接头

---

您可以尝试在最后终止/kill

shell URL

，然后打开新选项卡。或者参考第一个，每次通过循环都会打开一个新选项卡。您必须在第一次循环后捕获该选项卡，然后直接引用该选项卡。我们如何捕获该选项卡并重用它。有什么建议吗？？？@danieltakeshi给了你上面的链接

或参考此
此
是一个link@jsotoladanieltakeshi提供的链接不适用于我的场景。我在发布问题之前做了尽职调查。：-）您可以尝试在最后终止/kill
shell URL
，然后打开新选项卡。或者参考第一个，每次通过循环都会打开一个新选项卡。您必须在第一次循环后捕获该选项卡，然后直接引用该选项卡。我们如何捕获该选项卡并重用它。有什么建议吗？？？@danieltakeshi给了你上面的链接
或参考此
此
是一个link@jsotoladanieltakeshi提供的链接不适用于我的场景。我在发布问题之前做了尽职调查。：-）