使用Protect方法和Unprotect方法如何實(shí)現(xiàn)Excel工作簿的保護(hù)
Excel工作簿的保護(hù)是指不允許對(duì)Excel工作簿進(jìn)行增刪改操作,比如不能在工作簿中新增工作表,或者是不能在工作簿中刪除工作表,更改工作表的名稱等操作。以下是學(xué)習(xí)啦小編為您帶來(lái)的關(guān)于使用Protect方法和Unprotect方法實(shí)現(xiàn)Excel工作簿的保護(hù),希望對(duì)您有所幫助。
使用Protect方法和Unprotect方法實(shí)現(xiàn)Excel工作簿的保護(hù)
1、啟動(dòng)Excel并打開Visual Basic編輯器,在工程資源管理器中插入一個(gè)模塊,在該模塊的“代碼”窗口中輸入VBA代碼,如圖1所示。該程序代碼用于為工作簿添加保護(hù),具體代碼如下所示:
Sub ProtectWorkbook()
ActiveWorkbook.Protect Password:="123",Structure:=True '添加保護(hù)
End Sub
圖1 在“代碼”窗口中添加程序代碼
提示
Protect方法保護(hù)3個(gè)參數(shù),它們分別是Password、Structure和Windows。其中,Password參數(shù)用于指定保護(hù)密碼;Structure參數(shù)設(shè)置為True時(shí),將保護(hù)工作簿結(jié)構(gòu),此時(shí)無(wú)法對(duì)工作簿中的工作表進(jìn)行插入、刪除和復(fù)制等操作;Windows參數(shù)設(shè)置為True時(shí),將保護(hù)工作簿窗口,此時(shí)無(wú)法對(duì)窗口進(jìn)行最小化、最大化和關(guān)閉操作。
2、如果需要解除對(duì)工作簿添加的密碼保護(hù),可以在“代碼”窗口中添加代碼,如圖2所示。具體程序代碼如下所示:
Sub UnprotectWorkbook()
ActiveWorkbook.Unprotect"123" '取消密碼保護(hù)
End Sub
圖2 添加用于解除工作簿保護(hù)的程序代碼
3、運(yùn)行ProtectWorkbook過(guò)程,將無(wú)法對(duì)工作簿中的工作表進(jìn)行增刪等操作,同時(shí)工作簿窗口左上角的最大化、最小化等按鈕消失,該工作簿無(wú)法關(guān)閉,如圖3所示。運(yùn)行UnprotectWorkbook過(guò)程可取消對(duì)工作簿的保護(hù),工作簿能正常操作。
圖3 工作簿被保護(hù)
猜你喜歡: