如何使鼠标在Excel中独立于屏幕分辨率移动？

我想为一些同事创build一个Excel电子教学教程（混合学习）。 我想使用vba / vbs将鼠标移动到屏幕上，并将其显示在不同的命令所在的位置。 我知道这是可以做到的，但是当你改变屏幕分辨率时，它将不再起作用。 有没有办法使它独立于屏幕分辨率？

即：慢慢地将鼠标移动到“粗体”button，并点击它，不pipe当前select什么标签和屏幕分辨率？

感谢您的任何build议。

Answer 1

1. 这可以通过屏幕video捕捉工具来实现

2. 如果你坚持，在工作表上创build一个指针形状的形状，并使用附加代码的一些版本来移动它

   Sub MoveShape(shp As Shape, dbTop As Double, dbLeft As Double) Dim dbVerticalIncrement As Double, dbHorizontalIncrement As Double Dim lLoop As Long Const lSteps As Long = 1000 dbVerticalIncrement = (dbTop - shp.Top) / lSteps dbHorizontalIncrement = (dbLeft - shp.Left) / lSteps For lLoop = 1 To lSteps shp.Top = shp.Top + dbVerticalIncrement shp.Left = shp.Left + dbHorizontalIncrement Application.Wait (Now() + 0.0000001) Next lLoop End Sub