如何用按键精灵获取Excel单元格光标的位置,并跳转到指定位置? 如何在Excel单元格里面任意定位光标的位置?

作者&投稿:昌昌 (若有异议请与网页底部的电邮联系)
其实你把你的实际需求场景说明白了,可能会得到更多的解决方案,比如楼上说的VBA办法,当然也可以用按键精灵,但用按键精灵可以用主动式控制,而非被动得到后焦点后再作下一步动作。
如果一定要相结合,可以让EXCEL指挥鼠标到光标处,然后按键精灵接手获得鼠标的位置
以下是指挥到光标处的代码
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Private Const MOUSEEVENTF_ABSOLUTE = &H8000 '指定鼠标使用绝对坐标系,此时,屏幕在水平和垂直方向上均匀分割成65535×65535个单元
Private Const MOUSEEVENTF_MOVE = &H1 '移动鼠标
Private Const MOUSEEVENTF_LEFTDOWN = &H2 '模拟鼠标左键按下
Private Const MOUSEEVENTF_LEFTUP = &H4 '模拟鼠标左键抬起

Sub Mousemove()
Dim X As Long, Y As Long
Dim Px, Py, Px1, Py1
X = GetSystemMetrics32(0) ' 宽度(电脑像素)
Y = GetSystemMetrics32(1)
With ActiveCell
Px = .Left / 72 * GetPPI
Py = .Top / 72 * GetPPI
Px1 = ActiveWindow.PointsToScreenPixelsX(0)
Py1 = ActiveWindow.PointsToScreenPixelsY(0)
mw = (Px + Px1) * 65535 / X
mh = (Py + Py1) * 65535 / Y
End With
mouse_event MOUSEEVENTF_ABSOLUTE Or MOUSEEVENTF_MOVE, mw, mh, 0, 0
' mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0, 0, 0, 0 左健按下
End Sub

Private Sub CommandButton1_Click()
Mousemove
End Sub

以下代码放入模块
Declare Function GetDC Lib "user32" (ByVal hWnd As Long) As Long
Declare Function ReleaseDC Lib "user32" (ByVal hWnd As Long, ByVal hDC As Long) As Long
Declare Function GetDeviceCaps Lib "Gdi32" (ByVal hDC As Long, ByVal index As Long) As Long
Declare Function GetSystemMetrics32 Lib "user32" Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long '获取分辨率
Const LOGPIXELSX = 88
Const LOGPIXELSY = 90
Function GetPPI()
Dim hDC As Long
hDC = GetDC(0)
Dim X, Y
X = GetDeviceCaps(hDC, LOGPIXELSX)
Y = GetDeviceCaps(hDC, LOGPIXELSY)
GetPPI = X
End Function

获取鼠标位置代码,按键精灵百度一下就能得到,或已经可以用精灵直接控制LeftClick之类的动作了。

excel让选中的单元格 跳转至指定位置~

一、工具/原料
Excel
电脑一台

二、方法/步骤
第一种方法:
使用Excel自带的定位功能,使用快捷键Ctrl+G,打开定位功能,在引用位置输入需要跳转的单元格名称,然后点击确定即可。


第二种方法:
将鼠标定位到左上角的名称框,输入需要跳转的单元格名称,然后点击回车键。

你可以用光标键(即上、下、左、右键)定位单元格,如果想要编辑某个单远格中的内容,按一下F2,这个单远格即可获得输入焦点,然后你可以再用左、右光标键来移动到相要输入内容的位置。如果要在单元格里想换行,可按alt+Enter来实现。比起用鼠标来操作,这个效率快一点。呵呵。。。

按键精灵如何读取excel中的数据信息?
答:相信很多小伙伴都有在使用按键精灵,那么在其中我们怎么去读取excel表格的信息呢?方法很简单,下面小编就来为大家介绍。具体如下:1. 首先,打开软件按键精灵,在其中新建一个空白脚本。2. 接着,点击页面左上方的“全部命令”,在弹出选项中依次点击“插件命令”-“Office办公文档插件”。3. 之后,在...

按键精灵如何获取excel的某些单元格后并复制?
答:格式如下:Call Plugin.Office.OpenXls(文件路径)Text = Plugin.Office.ReadXls(页, 行, 列)Call Plugin.Sys.SetCLB(Text)Call Plugin.Office.CloseXls()比如excel的路径是:C:\测试.xls 单元格是:A4 那么代码如下:Call Plugin.Office.OpenXls("C:\测试.xls")Text = Plugin.Office.ReadXls(1...

如何用按键精灵获取Excel单元格光标的位置,并跳转到指定位置?
答:其实你把你的实际需求场景说明白了,可能会得到更多的解决方案,比如楼上说的VBA办法,当然也可以用按键精灵,但用按键精灵可以用主动式控制,而非被动得到后焦点后再作下一步动作。如果一定要相结合,可以让EXCEL指挥鼠标到光标处,然后按键精灵接手获得鼠标的位置 以下是指挥到光标处的代码 Private ...

按键精灵怎样读取excel表格内容
答:有时候使用按键精灵时,因实际需求要查询excel表格信息,怎么办呢?下文就是,一起看看去吧。我们先打开按键精灵,新建一个空白的就可以了,比较复杂高级的是创建一个带界面的脚本,今天主要介绍读取excel表格内容。然后在全部命令里。选择插件命令。在选择office办公插件。首先我们要做的是打开一个excel文档...

按键精灵怎么读取表格里面的内容?
答:1、打开按键精灵,新建一个带界面的脚本脚本。2、选择界面,然后选择输入框,可以便于数据的显示和用户自己输入数据。3、在界面上画出一个可以随时调节大小和位置的文本输入框,右边是它的一些数据信息,可以把“输入框1”这几个字去掉。4、界面画好后,点击设置界面按钮,相当于保存确定操作。5、双击...

按键精灵,如何提取excel表格指定单元格。
答:Call Plugin.Office.OpenXls("D:\我的文档\桌面\人数.xls"Text = Plugin.Office.ReadXls(1, 1, 1)MoveTo 400, 20 LeftClick 1 Delay 1000 SayString Text

按键精灵如何选取excel里面同一列的10个连续个的单元格的内容
答:1选中编辑栏左边的名称框;2在其中输入 A1:A10 (A11:A20 A21 :A30 ...)3回车 4Ctrl+C (复制)5选到新的环境 6Ctrl+V (粘贴)重复以上

按键精灵如何读取windows表格内容?
答:按键精灵里的插件命令你可以看看 //定义变量// dim a,text Call Plugin.Office.OpenXls("C:\AA.xls")a = 1 x = 1 y = 2 //读取表格,括号内第2个是行,第3个是列// Text = Plugin.Office.ReadXls(1, a, 1)a = a + 1 //写入指定位置// Call Plugin.Office.WriteXls(2, x,...

按键精灵提取EXCEL,逐行
答:我做过,把要复制的内容放在最下面一行,用按键精灵录制:1、点到A9的位置 2、按下键盘向下 3、复制A10的内容 4、点到网页要放姓名的位置,粘贴 5、再点到A10的位置(就是原来A9的位置,因为按了键盘,上移了)。6、按下键盘向右 7、复制B10的内容 8、点到网页要放号码的位置,粘贴 循环上面...

如何使用按键精灵辨别EXCEL的单元格
答:读取EXCEL文件要先用Plugin Office.OpenXls()打开EXCEL文件,读完后还要用Plugin Office.CloseXls()关闭。比如下面是读取 D:\测试.xls 这个文件的 Sheet1 工作表的第3行B列中的数据(B3)保存到变量p中并弹出对话框显示P的值的写法: Plugin Office.OpenXls("D:\测试.xls")Plugin P=Office.Read...