下面的VBA代码可以控制鼠标的活动范围，也就是鼠标可以操作的范围。哪里能操作，哪里不能操作，都可以控制。

代码如下，并附有说明。

With ActiveSheet 'With语句，它在单个对象上执行一系列语句。“取消保护”取消对没有密码的工作表的保护。细胞。“锁定=假”解锁活动工作表中的所有单元格。范围(' f13360j99 ')。“锁定=真”只有[F1:J99]区域被锁定。启用选择=xlunlockdcells '只能选择未有效锁定的单元格。“保护”工作表保护(无密码)

以“With”结束语句结束

上述代码在代码窗口中使用。[F1:J99]鼠标不能在该区域使用。