如何检测鼠标位置并单击VBA用户窗体中的形状

Question

我正在使用Excel用户表单，如果有任何方法可以在VBA中跟踪用户表单上的鼠标位置和鼠标单击（单击），我真的很好奇吗？

例如，我想测量两次点击之间的反应时间，并在用户表格上报告它们的距离;为此，我首先在userform上随机添加两个圆形，然后我想在点击一个圆后开始计时，并在点击另一个圆后结束计时。

更具体地说，有什么方法可以： 1.在用户窗体上检测鼠标单击形状 2.单击用户表单后检测鼠标位置

在这种情况下，mouseevent仍然有用吗？非常感谢你！

Answer 1

您可以将形状作为图像添加到UserForm并使用Private Sub Image1_Click()。您可以跟踪点击事件中的时间并使用图像的位置来跟踪距离。