如何在VBA中打开特定的Chrome配置文件

时间:2016-07-18 20:26:39

标签: excel vba

我有两个我经常同时使用的Chrome配置文件,我在Excel中打开了许多带有宏的URL。我可能会在两个Chrome窗口之间切换,一个用于杂项,另一个用于打开Excel中的所有链接。当我在Excel中打开网址时,我将其配置为仅在Chrome中打开,但它会始终在我的有效Chrome窗口中打开该网址。我希望能够指定它打开的配置文件。这可能吗?

我的额外Chrome个人资料的快捷方式定位了这样的Chrome:

  

" C:\ Program Files(x86)\ Google \ Chrome \ Application \ chrome.exe"   --profile-directory =" Profile 1"

但是我还没有找到在Shell命令中指定它的方法:

Dim CheckLast As Long
  CheckLast = Worksheets("Work").Range("G" & Rows.Count).End(xlUp).Offset(1).Row

myStr = "http://" & Worksheets("Work").Cells(CheckLast, "C").Value
Shell "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe " & myStr

1 个答案:

答案 0 :(得分:0)

事实证明,我需要做的就是在个人资料名称后添加一个空格。因此,如果您想在Chrome中的特定个人资料中打开Excel中的链接,请按以下方式进行操作:

Dim CheckLast As Long
  CheckLast = Worksheets("Work").Range("G" & Rows.Count).End(xlUp).Offset(1).Row

myStr = "http://" & Worksheets("Work").Cells(CheckLast, "C").Value
Shell "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe --profile-directory=""Profile 1"" " & myStr

请注意,个人资料名称周围的两个双引号("个人资料1和#34;)正在转发双引号,这些双引号是用于在Chrome中调用个人资料的字符串的一部分。

这花了我太多的时间来弄明白。但现在任何碰巧谷歌类似问题的人都希望能够找到它。