EXCEL实时获取鼠标坐标（稳定）

先看效果：

先添加类模块，命名为 MousePosition

MousePosition类模块代码：

Option ExplicitPrivate Declare PtrSafe Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Declare PtrSafe Function GetInputState Lib "user32" () As LongPublic WithEvents iApp As ApplicationPrivate Type POINTAPIX As LongY As Long
End TypePrivate Sub Class_Initialize() '类初始化Set iApp = Excel.Application '设置iApp为当前Excel应用程序实例getMousePosition
End SubPrivate Sub getMousePosition()Dim p As POINTAPIDim i As LongDo While TrueIf Not GetInputState() ThenGetCursorPos p                             '获取鼠标指针坐标iApp.StatusBar = p.X & "," & p.Y      '将鼠标坐标实时写入状态栏DoEvents                                      '让出控制权End IfLoop
End Sub

然后在标准模块中插入如下代码：

Option ExplicitDim mCls As MousePositionSub mStarts()Set mCls = New MousePosition
End Sub

在VBE中按F5运行mStarts过程

案例文件下载

https://download.csdn.net/download/qq_25846269/14951583

EXCEL实时获取鼠标坐标（稳定）相关推荐

基于JQuery实现鼠标滑过（类似hover）图片（或Canvas），实时获取鼠标坐标位置
前言: 尝试制作web端物体标注的时候,虽然利用Canvas可以标注物体,但缺少像LabelImg那样可以利用十字星定位鼠标起点的辅助功能.一直认为可以通过鼠标hover事件实时获取鼠标位置,尝试后无 ...
JS实时获取鼠标坐标
简单练习,先上图非常简单,只是一个onmousemove事件的处理 <!DOCTYPE html> <html lang="en"> <head&g ...
php 获取鼠标的坐标,如何实时获取鼠标的当前坐标-
本文来做一个简单的实时获取鼠标坐标的功能,在canvas动画开发中,获取鼠标的坐标,键盘的按键等等,都是常用的操作,我们就慢慢得把他们封装成一个公共库. 一.事件的兼容:function bindEv ...
python 移动鼠标位置_python 调用pyautogui 实时获取鼠标的位置、移动鼠标的方法
PyAutoGUI是一个纯Python的GUI自动化工具,其目的是可以用程序自动控制鼠标和键盘操作,利用它可以实现自动化任务本章介绍了许多不同函数,下面是快速的汇总参考: moveTo(x,y)将鼠 ...
php控制鼠标,HTML_用VBS控制鼠标的实现代码（获取鼠标坐标、鼠标移动、鼠标单击、鼠标双击、鼠标右击），怎么用VBS模拟鼠标左键单击、 - phpStudy...
用VBS控制鼠标的实现代码(获取鼠标坐标.鼠标移动.鼠标单击.鼠标双击.鼠标右击) 怎么用VBS模拟鼠标左键单击.左键双击.右键单击?-- 网上搜到的答案普遍是VBS无法实现,或者是要用第三方COM( ...
C++获取鼠标坐标并移动鼠标
原文章地址: C++获取鼠标坐标并移动鼠标公司电脑强制设定10分钟无鼠标键盘输入便锁屏,锁屏之后要重新输入密码太麻烦.代码自动检测过去4.9分钟内鼠标是否发生了移动,如果没有发生移动则移动鼠标位置. ...
Windows下C/C++模拟鼠标点击，PC端没有鼠标设备也能够获取鼠标坐标、移动鼠标坐标、模拟鼠标点击事件，方法一亲测有效
------- [ 转载请保留 ] ------- 作者:西_瓜_瓜博客:https://blog.csdn.net/xi_gua_gua/article/details/105773298 --- ...
最全的获取鼠标坐标的方法
今天给朋友们分享js获取鼠标坐标的最全方法集合: HTML.CSS与JS代码如下: <!DOCTYPE HTML> <html lang="zh-cn"> ...
openlayers学习——10、openlayers监听获取鼠标坐标位置
openlayers监听获取鼠标坐标位置前言:基于Vue,学习openlayers,根据官网demo,记录常用功能写法.本人不是专业GIS开发,只是记录,方便后续查找. 参考资料: openlaye ...

EXCEL实时获取鼠标坐标（稳定）

EXCEL实时获取鼠标坐标（稳定）相关推荐

最新文章

热门文章