winapi - 如何在 VBA 中制作“原子”块？

Question

如何使以下行作为原子操作运行：

Sheets("worksheet34").Select
Range("D15").Select
Application.WindowState = xlMaximized
SetCursorPos 200, 600 'set mouse position at 200, 600
Call mouse_event(MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0) 'click left mouse
Application.SendKeys ("R")

我想确保所有行都以相同的顺序执行，彼此之间没有延迟。

上面的代码是我前往特定单元格并REFRESH在该单元格上进行选择的技巧。

Win32：代码块的原子执行

同步功能 (Windows)

Answer 1

你不能。您对 Excel 没有太多的控制权来保证它是原子的，并且 Excel 将做一些事情来响应您的消息，包括弹出菜单所需的消息泵。

了解如何在 Excel VBA 中执行某些操作的最佳方法是录制宏并查看生成的代码。

在您的特定情况下，Calculate()单元格或范围的方法应该刷新值。