商易用户论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 4129|回复: 0

[办公软件] 利用宏给Excel工作簿文档自动添加密码

[复制链接]
  • TA的每日心情
    开心
    昨天 15:14
  • 签到天数: 3816 天

    [LV.Master]伴坛终老

    发表于 2011-9-14 19:58:59 | 显示全部楼层 |阅读模式
       
        在Excel中在给工作簿文档添加密码时,需要通过选项一个一个的设置,比较麻烦。下面,我们利用一个自动运行的宏,让软件自动给文档添加密码。

      1、启动Excel,执行“工具→宏→Visual Basic 编辑器”命令,进入VBA编辑状态。

      2、在左侧的“工程资源管理器”窗口中,选中“VBAproject(PERSONAL.XLS)”(个人宏工作簿)选项。

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

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

      Sub Auto_close()

      ActiveWorkbook.Password = "123456"

      ActiveWorkbook.Save

      End Sub

        退出VBA编辑状态。

      注意:这是一个退出Excel时自动运行的宏,其宏名称(Auto_close)不能修改。

      5、以后在退出Excel时,软件自动为当前工作簿添加上密码(123456,可以根据需要修改),并保存文档。
    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    QQ|申请友链|小黑屋|手机版|Archiver|鲁ICP备14001487号|商易用户论坛 ( 鲁ICP备14001487号 )

    GMT+8, 2024-12-22 14:10 , Processed in 0.062260 second(s), 19 queries .

    Powered by Discuz! X3.4

    © 2001-2017 Comsenz Inc.

    快速回复 返回顶部 返回列表