怎么使用Protect方法和Unprotect方法實現(xiàn)Excel工作簿的保護(hù)？

1、啟動Excel并打開Visual Basic編輯器，在工程資源管理器中插入一個模塊，在該模塊的“代碼”窗口中輸入VBA代碼，如圖1所示。該程序代碼用于為工作簿添加保護(hù)，具體代碼如下所示：

Sub ProtectWorkbook()

ActiveWorkbook.Protect Password:="123",Structure:=True '添加保護(hù)

End Sub

圖1　在“代碼”窗口中添加程序代碼

提示

Protect方法保護(hù)3個參數(shù)，它們分別是Password、Structure和Windows。其中，Password參數(shù)用于指定保護(hù)密碼;Structure參數(shù)設(shè)置為True時，將保護(hù)工作簿結(jié)構(gòu)，此時無法對工作簿中的工作表進(jìn)行插入、刪除和復(fù)制等操作;Windows參數(shù)設(shè)置為True時，將保護(hù)工作簿窗口，此時無法對窗口進(jìn)行最小化、最大化和關(guān)閉操作。

2、如果需要解除對工作簿添加的密碼保護(hù)，可以在“代碼”窗口中添加代碼，如圖2所示。具體程序代碼如下所示：

Sub UnprotectWorkbook()

ActiveWorkbook.Unprotect"123" '取消密碼保護(hù)

End Sub

圖2　添加用于解除工作簿保護(hù)的程序代碼

3、運行ProtectWorkbook過程，將無法對工作簿中的工作表進(jìn)行增刪等操作，同時工作簿窗口左上角的最大化、最小化等按鈕消失，該工作簿無法關(guān)閉，如圖3所示。運行UnprotectWorkbook過程可取消對工作簿的保護(hù)，工作簿能正常操作。

圖3　工作簿被保護(hù)