刷新表后保持excel表格式

时间:2012-09-14 16:56:35

标签: excel excel-vba vba

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

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

一旦刷新完成,我需要应用一些格式化(trhough VBA代码),问题是代码执行而不等待刷新结束,因此VBA宏失败,有没有办法告诉我等待刷新完成的宏?

由于

1 个答案:

答案 0 :(得分:1)

尝试将BackgroundQuery属性设置为False。

代码:

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

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