Question

我试图拼凑/学习VB来创建一个真正的简单脚本来打开excel文档，基于我指定的文件路径，刷新外部数据连接。然后等待刷新完成，然后将文件保存在同一位置，然后退出excel。

到目前为止，除了保存文件之外的其他内容似乎有效，它将其保存到其他位置，并且不会覆盖现有文件！

这是我第一次使用VB，我被预定在几个月的时间内继续学习这个课程，但我想首先尝试一下，通过从谷歌和这个网站获取一些代码：）

对不起如果这是一个简单的问题，但对我来说这是一个非常具有挑战性的问题！

这是我到目前为止所拥有的......

Dim oExcel
Set oExcel = CreateObject("Excel.Application") 

oExcel.Visible = True
oExcel.DisplayAlerts = False
oExcel.AskToUpdateLinks = False
oExcel.AlertBeforeOverwriting = False

Set oWorkbook = oExcel.Workbooks.Open("The File Path of my .xlsx File")
oWorkbook.RefreshAll
oWorkbook.Save

oExcel.Quit
Set oWorkbook = Nothing
Set oExcel = Nothing

我想要发生的是，从名为的位置打开excel文件，更新外部数据，保存文件，覆盖原始文件。关闭Excel。

非常感谢约翰。

Answer 1

尝试以下

oWorkbook.RefreshAll 'Refresh everything
DoEvents 'Let Excel finish
oWorkbook.Close true 'Close the workbook true for save.

用于刷新Excel的VB脚本

1 个答案: