找回密码

立即注册

记住登录
登录
查价
高级搜索
古泉社区 » 电脑与网络 » 利用宏给Excel工作簿文档自动添加密码
发帖 回复
返回列表页1 转到页
    查看 677 | 回复 1

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

    一键送评园地评级，为您保驾护航
    离线 子非我
    信用分 1118 (优秀)

    • 1222

      主题

    • 18011

      帖子

    • 2万

      积分

    论坛版主
    荣誉
    2023年度优秀版主
    好评
    19
    差评
    0
    精华
    3
    注册时间
    2006-08-16
    最后登录
    2024-05-11
    楼主 发表于2007-04-23 20:17:00
    只看该作者

    作者：陈秀峰 原创　　在Excel中在给工作簿文档添加密码时，需要通过选项一个一个的设置，比较麻烦。下面，我们利用一个自动运行的宏，让软件自动给文档添加密码。　　1、启动Excel，执行“工具→宏→Visual Basic 编辑器”命令，进入VBA编辑状态(如图1)。进入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，可以根据需要修改)，并保存文档。
    回复 点赞 救生圈 图片鉴定 园地评级
    举报
    离线 yiw
    信用分 0 (初级)

    • 0

      主题

    • 12

      帖子

    • 12

      积分

    普通会员
    好评
    0
    差评
    0
    红包
    0
    精华
    0
    注册时间
    2007-04-16
    最后登录
    2021-04-10
    1楼 发表于2007-04-24 17:15:00
    只看该作者

    好东西
    回复
    举报
    发帖 回复
    返回列表页1 转到页
    网站首页 | 广告服务 | 关于我们 | 联系我们 | App下载 | 操作指南

    COPYRIGHT © 1999-2022 Powered by www.chcoin.com All rights reserved 湘ICP备19000294号 长沙古泉园地拍卖有限公司 长沙古泉园地艺术品有限公司

    特别申明：古泉园地公司对其公司官网上发表的文章、照片及相关信息等，未经本公司书面同意及授权，不得复制或引用及转载，否则公司将依法追究相关方之法律责任！

    地址：湖南长沙市开福区湘江中路7311kc万达广场A座47楼古泉园地

    联系电话: 拍卖-0731-85500310、安支-0731-85500311、网络-0731-85500320、评级-0731-85500332

    回到顶部