Re: [算表] 保護工作表後限制移動儲存格(VBA)
請用看看囉,用這個方法,沒有使用保護就是了,
位置可以自己改
1.Alt+F11
2.左邊視窗點選 Sheet1(Sheet1)
3.右邊視窗貼上以下程式
4.關閉程式視窗即可
Option Explicit
Dim preRow As Integer
Dim preColumn As Integer
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim cell As Range
For Each cell In Target
'鎖定的位置
If (cell.Row >= 2 And cell.Row <= 7) And _
(cell.Column >= 2 And cell.Column <= 7) Then
If preRow <> cell.Row Or preColumn <> cell.Column Then
preRow = cell.Row
preColumn = cell.Column
End If
Else
Cells(preRow, preColumn).Select
End If
Next cell
End Sub
※ 引述《hube (火暴 火乍)》之銘言：
: (若是和其他不同軟體互動之問題 請記得一併填寫)
: 軟體:Excel
: 版本:2007
: A B C D E F G H I
: 1 ■■■■■■■■□
: 2 ■□□□□□□■□
: 3 ■□□□□□□■□
: 4 ■□□□□□□■□
: 5 ■□□□□□□■□
: 6 ■□□□□□□■□
: 7 ■■■■■■■■□
: 假設 □ 是未鎖定的儲存格，■ 是鎖定的
: 如果在保護工作表後，用方向鍵移動黑色框框時
: 從 G2 往右會跳到 I2，如果把 I 以後也鎖定的話則是會跳到 B3
: 請問我可以讓黑色框框遇到鎖定區域後，就會被擋住而不要跳到別的地方嗎？
: 還是有什麼別的方法可以達到同樣的效果呢？
: 謝謝！
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.131.84.231
推
05/13 19:59, , 1F
05/13 19:59, 1F
→
05/13 21:18, , 2F
05/13 21:18, 2F
Office 近期熱門文章
PTT數位生活區 即時熱門文章
-3
16
