我需要在 Google chrome 浏览器的同一选项卡中打开两个链接。下面是我尝试过的代码,但在 Browser = Shell(Chromepath & "-url URL1") 行中出现“找不到文件”错误。打开第一个 URL(登录页面)后,它应该导航到同一选项卡中的第二个 URL。
Sub Defects()
Dim ExtractliveApp As Variant
Dim Browser As Variant
Dim URL As Variant
URL1 = "go/ExtractliveApp"
URL2 = "https://Extract.live.com/SelfServiceExtracts"
Chromepath = "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"
Browser = Shell(Chromepath & "-url URL1")
Browser = Shell(Chromepath & "-url URL2")
End Sub
最佳答案
您的代码中有错字:
Browser = Shell(Chromepath & "-url URL1")
Browser = Shell(Chromepath & "-url URL2")
应该
Browser = Shell(Chromepath & " -url " & URL1)
Browser = Shell(Chromepath & " -url " & URL2)
Chromepath
后面需要一个空格否则壳牌正在寻找chrome.exe-url
它找不到(因此出现错误)。我还修复了 URL 变量的使用,因为它们需要在引号之外,以便正确引用它们。将它们留在里面会导致它们被逐字处理,Chrome 将尝试浏览到 URL1 而不是您的链接。
关于vba - 在同一选项卡中打开两个链接的代码,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/37790373/