Excel VBA中Selenium右键元素后如何选择Save As命令？

方案1：定位网页原生右键菜单元素（优先推荐） #

如果右键菜单是网页自身渲染的（而非系统级弹窗），可以直接通过Selenium定位Save As选项并点击，完全避免键盘模拟的不可靠性：

' 右键点击目标元素
bot.Actions.ClickContext(.FindElementById("Button3")).Perform

' 显式等待右键菜单加载完成（避免元素未就绪）
Dim wait As New WebDriverWait
wait.Timeout = 10 ' 设置10秒超时时间
wait.Until(ExpectedConditions.ElementIsVisible(By.LinkText("Save As"))).Click

如果LinkText定位不生效，可根据菜单元素的实际属性调整选择器，比如CSS选择器或XPath：

wait.Until(ExpectedConditions.ElementIsVisible(By.CssSelector(".context-menu-item-saveas"))).Click

方案2：用Selenium Actions类模拟键盘操作（替代Excel SendKeys） #

如果右键菜单是浏览器/系统级的（比如Chrome右键图片的Save As菜单），Selenium无法直接定位元素，这时可以用Selenium自带的Actions类发送按键，比Excel的Application.SendKeys可靠得多——因为它是绑定到当前浏览器会话的，不受全局焦点干扰：

' 右键点击目标元素
bot.Actions.ClickContext(.FindElementById("Button3")).Perform

' 等待菜单弹出（可根据实际情况调整等待时长）
bot.Wait 500

' 模拟按向下箭头选中Save As（按几次取决于菜单中Save As的位置）
bot.Actions.SendKeys(Keys.Down).SendKeys(Keys.Down).SendKeys(Keys.Enter).Perform

' 或者如果知道Save As对应的快捷键（比如Chrome中右键图片后按"A"），直接发送：
' bot.Actions.SendKeys("a").Perform

为什么Application.SendKeys不可靠？ #

Application.SendKeys是Excel的全局键盘模拟方法，它依赖当前操作系统的焦点完全在浏览器窗口上，一旦焦点意外转移（比如弹出通知、其他程序激活），操作就会失效。而Selenium的Actions类是针对当前浏览器会话的操作，仅作用于浏览器内部，稳定性远高于前者。

内容的提问来源于stack exchange，提问作者YasserKhalil