vba获取鼠标位置 VBA里,如何获取鼠标坐标?简单点?
VBA里,如何获取鼠标坐标?简单点?DeclareFunctionGetCursorPosLib“user32”(lpPointAsPOINTAPI)aslongtypointapixaslongya
VBA里,如何获取鼠标坐标?简单点?
DeclareFunctionGetCursorPosLib“user32”(lpPointAsPOINTAPI)aslongtypointapixaslongyaslongendtypepublicsfunctiongetmouseuxuy()AsPOINTAPIGetCursorPosgetmouseuxuyendfunctionsubtest()“callgetmouseuxuu”Call“get mouse coordinate value procedure”(假设您给出的过程/程序名为getmouse)uxuy)ifgetmouseuxuy、 x>100和getmouseuxuy.y>100然后……“根据返回到当前鼠标endsub的坐标值执行一个过程/程序