工具/原料

• 手机

方法/步骤

1. 首先在开发工具中打开VBA编辑器

2. 在单元格区域当中输入一些内容作为例子

3. 在VBA编辑器中插入模块

4. 在模块当中输入如下代码然后运行

    

   Public Declare Function ClipCursor Lib "Use32" (lpRect As Any) As Long

    

   Public Type RECT

    

       Left As Long

    

       Top As Long

    

       Right As Long

    

       Bottom As Long

    

   End Type

    

   Sub锁定当前鼠标移动区域()

    

       Dim distance As RECT

    

       distance.Bottom=160

    

             '允许鼠标移动区域最下沿离窗口顶端距离若为0则禁止鼠标上下移动

    

       distance.Top=0  '允许鼠标移动区域最上沿离窗口顶端距离不能大于Bottom

    

       distance.Left=0

    

             '允许鼠标移动区域最左沿离窗口左端距离若为0则禁止鼠标左右移动

    

       distance.Right=1024 '允许鼠标移动区域最右沿离窗口左端距离不能小于Left

    

       ClipCursor distance

    

   End Sub

5. 用快捷键Alt+F8调出运行宏窗口然后单击执行按钮鼠标已限定在功能区范围移动无法移到工作表编辑区

注意事项

• 智能手机助理给我们生活带来了极大便利！