在VBA代码运行时更新单元格值

Question

早上好，

自升级到Excel 2013以来，我无法在运行VBA代码时看到单元格值的更改。例如，当代码运行时，我想要单元格＆＃34; A1＆＃34;说＆＃34;处理＆＃34;在代码的最后我将值更改为＆＃34;完成＆＃34;。

使用以前版本的Excel，这不是问题。我可以简单地打开Application.Screenupdating = True。不幸的是，现在似乎并没有影响细胞的价值。我已经创建了一个单独的sub，它只是改变了值，然后激活了代码，甚至没有工作。处理时间可以持续10秒至3-5分钟。有没有办法让这个再次起作用？

    Sub status()
    Application.ScreenUpdating = True
'Cell change below isn't visible in worksheet unless I pause the code
    ActiveWorkbook.Worksheets("Checklist").Range("F2") = "<<<PROCESSING>>>"
    Open_Network_Folder
'The change below is visible as it's the last step in the code process. 
    ActiveWorkbook.Worksheets("Checklist").Range("F2") = "Complete"
    End Sub

谢谢

Answer 1

放置一个

DoEvents

设置单元格值后立即

语句。