在宏的中间打开电子表格

Question

目前，我有一个从Internet下载Excel文件的子程序。我想打开电子表格，并在子结束之前在其上运行更多命令。

问题是电子表格在宏完成执行后才会打开，因此无法找到工作簿。

With appIE
    .Navigate "https://www.alerian.com/wp-content/uploads/AMZmembers.xls"
    .Visible = False

   Application.Wait Now + TimeValue("00:00:03")
   SendKeys "{Enter}"
End With

Application.Workbooks("AMZmembers.xls").Close 

SendKeys“{Enter}”打开工作表，但在子工作完成后才会打开;因此，Workbooks.close无法找到工作表，因为它尚未打开。

感谢帮助！

Answer 1

使用Workbooks.Open "path_and_filename"代替SendKeys。 Open方法中有许多其他参数，例如是否要将其打开为只读等，但最简单的方法如图所示。