利用宏給Excel工作簿文檔自動(dòng)添加密碼

在Excel中在給工作簿文檔添加密碼時(shí)，需要通過(guò)選項(xiàng)一個(gè)一個(gè)的設(shè)置，比較麻煩。下面，我們利用一個(gè)自動(dòng)運(yùn)行的宏，讓軟件自動(dòng)給文檔添加密碼。
    1、啟動(dòng)Excel，執(zhí)行“工具→宏→Visual Basic 編輯器”命令，進(jìn)入VBA編輯狀態(tài)(如圖1)。
    
    2、在左側(cè)的“工程資源管理器”窗口中，選中“VBAproject(PERSONAL.XLS)”(個(gè)人宏工作簿)選項(xiàng)。
    3、執(zhí)行“插入→模塊”命令，插入一個(gè)模塊(模塊1)。
    4、將下述代碼輸入到右側(cè)的代碼編輯窗口中：
    Sub Auto_close()
    ActiveWorkbook.Password = "123456"
    ActiveWorkbook.Save
    End Sub
    退出VBA編輯狀態(tài)。
    注意：這是一個(gè)退出Excel時(shí)自動(dòng)運(yùn)行的宏，其宏名稱(chēng)(Auto_close)不能修改。
    5、以后在退出Excel時(shí)，軟件自動(dòng)為當(dāng)前工作簿添加上密碼(123456，可以根據(jù)需要修改)，并保存文檔。