0

我有使用 sproc 刷新 Excel 表的 VBA 代码

With ActiveWorkbook.Connections("Connection").OLEDBConnection
Values = QueryStr 
.CommandText = Values
End With

刷新完成后,我需要应用一些格式(通过 VBA 代码),问题是代码在不等待刷新结束的情况下执行,因此 VBA 宏失败,有没有办法告诉宏等到刷新完成?

谢谢

4

1 回答 1

1

尝试将 BackgroundQuery 属性设置为 False。

代码:

With ActiveWorkbook.Connections("Connection").OLEDBConnection
    .BackgroundQuery = False '- Change here
    Values = QueryStr
    .CommandText = Values
End With

如果我没记错的话..这将阻止更新在后台运行,因此必须在其余代码执行之前完成。

于 2012-09-14T18:46:18.907 回答