鼠標(biāo)不動了怎么辦 鼠標(biāo)不動了怎么辦燈亮
2024-07-31
更新時間:2024-08-01 00:07:45作者:未知
以下的VBA代碼,可以控制鼠標(biāo)的活動范圍,即控制鼠標(biāo)能操作的范圍。哪里能操作,哪里不能操作,都能控制。
代碼如下,附帶詮釋。
With ActiveSheet 'With 語句,在一個單一對象上執(zhí)行一系列的語句
.Unprotect '解除沒設(shè)密碼的工作表保護
.Cells.Locked = False '解除活動工作表中所有單元格的“鎖定”
.Range("F1:J99").Locked = True '只鎖定 [F1:J99] 區(qū)域
.EnableSelection = xlUnlockedCells '僅允許選定未被有效鎖定的單元格
.Protect '工作表保護(沒設(shè)密碼)
End With 'With 語句結(jié)束
以上的代碼在代碼窗口中使用。[F1:J99]區(qū)域不能使用鼠標(biāo)。