Excel 如何提取电子邮件地址 Private子命令按钮2\u单击（） 尺寸ie、项目、元素作为对象 尺寸i，j，k，l为整数 i=2 k=2 l=2 设置ie=CreateObject（“Internetexplorer.application”） 可见=真实 即“导航”https://www.amazon.com/gp/pdp/profile/A3NEAETOSXDBOM/" 在ie.busy或ie.readystate 4时执行 环 对于i=0到500 出错时继续下一步 Range（“A”&i）.Value=ie.document.getelementsbytagname（“A”）.Item（i）.innertext 接下来我 端接头

我希望检索页面左侧显示为“发送电子邮件”的电子邮件地址&单击后会显示电子邮件地址

---

注意：您必须登录才能查看发送电子邮件选项。

在结束子项之前添加以下代码：

Set sendAnEmail = ie.Document.getElementsByClassName("a-link-normal pr-email").Item(0)

sendAnEmail.Click  

Application.Wait Now + TimeSerial(0, 0, 2)

retrievedEmail = sendAnEmail.innerText

MsgBox retrievedEmail

---

然而，你应该看看亚马逊关于网络抓取的政策，因为这不可能是100%合法的

我已经试过了。但它不起作用（请在命令按钮上建议或提供完整的代码。它不知怎么工作。但是outlook电子邮件编辑器正在弹出。是否有任何解决方案可以在每次运行代码时关闭它或杀死outlook？