限定Excel工作表可用編輯范圍的幾種方法

1、因工作需要，我們常常需要對(duì)工作表的某一范圍設(shè)置訪問(wèn)權(quán)限，禁止別人改動(dòng)該單元格區(qū)域的內(nèi)容。這里向大家介紹實(shí)現(xiàn)這一目標(biāo)的3種方法。一、設(shè)置ScrollArea屬性如果要使工作表的A1:E10單元格區(qū)域不被改動(dòng)(下同)，可以采取限定垂直滾動(dòng)條范圍的辦法，隱藏A1:E10單元格區(qū)域，從而達(dá)到限定使用范圍的目的。具體步驟如下：1、執(zhí)行“視圖工具欄控件工具箱”命令，在打開(kāi)的“控件工具箱”工具欄中，單擊“屬性”按鈕，顯示如圖一所示的“屬性”對(duì)話框。圖12、在“屬性”對(duì)話框的ScrollArea一欄里輸入“A45:E45”(該范圍可自己選定)，然后按Enter鍵。執(zhí)行上述步驟后，我們發(fā)現(xiàn)A1:E10單元格區(qū)域

2、不再出現(xiàn)在工作表中窗口中了，而且也無(wú)法移動(dòng)垂直滾動(dòng)條。由于ScrollArea屬性不是永久的，關(guān)閉了文件，下次再打開(kāi)時(shí)又可隨意選擇編輯上述區(qū)域。因此還需在ThisWorkbook代碼模塊中添加下面一段代碼。Private Sub Workbook_Open()Worksheets(sheet1).ScrollArea=A45:E45End Sub這樣，每次打開(kāi)工作簿時(shí)，上述代碼自動(dòng)運(yùn)行，并設(shè)定ScrollArea屬性。作為保護(hù)工作表內(nèi)容，這種方法是個(gè)不錯(cuò)的選擇。二、使用工作表保護(hù)1、激活Sheet1表，選中允許填充數(shù)據(jù)的單元格區(qū)域，右擊選擇“設(shè)置單元格格式”，在“保護(hù)”選項(xiàng)卡中取消“鎖定”復(fù)選

3、項(xiàng)，單擊“確定”按鈕退出。然后依次單擊菜單“工具保護(hù)保護(hù)工作表”，在彈出的對(duì)話框列表中，輸入保護(hù)密碼，勾選“選定未鎖定的單元格”選項(xiàng)，其他選項(xiàng)全部清除(如圖2所示)，點(diǎn)擊“確定”返回。圖22、保護(hù)工作表后，再按回車鍵或按方向鍵，光標(biāo)則只能在原來(lái)取消鎖定的單元格之間來(lái)回移動(dòng)，而被鎖定A1:E10單元格區(qū)域單元格則不能激活，從而達(dá)到了限制訪問(wèn)的目的。三、利用VBA設(shè)置訪問(wèn)權(quán)限我們也可以利用VBA代碼，設(shè)置權(quán)限密碼，當(dāng)編輯Sheet1工作表A1:E10單元格區(qū)域時(shí)，自動(dòng)彈出輸入密碼提示框，密碼正確時(shí)，該單元格被激活，否則，單元格內(nèi)容不能被改動(dòng)。具體方法如下：執(zhí)行“工具宏Visul Basic編輯器”命令或按下Alt+F11組合鍵，在代碼窗口左側(cè)的“工程資源管理器”窗口中，雙擊Excel對(duì)象下的Sheet1工作表，在右側(cè)的代碼窗口中輸入以下代碼：Private Sub Worksheet_Change(ByVal Target As Range)X=TargetEnd SubPrivate Sub Worksheet_SelectionChange(ByVal Target As Range)If Target.Column = 5 And Target.Row= 10 ThenY=InputBox(請(qǐng)輸入密碼：)If Y 123 ThenMsg