利用宏给Excel工作簿文档自动添加密码

在excel中在给工作簿文档添加密码时，需要通过选项一个一个的设置，比较麻烦。下面，我们利用一个自动运行的宏，让软件自动给文档添加密码。

　　1、启动excel，执行“工具→宏→visual basic 编辑器”命令，进入vba编辑状态(如图1)。

[center][/center]
[center]图1[/center]

2、在左侧的“工程资源管理器”窗口中，选中“vbaproject(personal.xls)”(个人宏工作簿)选项。

　　3、执行“插入→模块”命令，插入一个模块(模块1)。

　　4、将下述代码输入到右侧的代码编辑窗口中：

　　sub auto_close()
　　activeworkbook.password = "123456"
　　activeworkbook.save
　　end sub

　　退出vba编辑状态。

　　注意：这是一个退出excel时自动运行的宏，其宏名称(auto_close)不能修改。

　　5、以后在退出excel时，软件自动为当前工作簿添加上密码(123456，可以根据需要修改)，并保存文档。