转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 软件使用 >> 办公软件 >> 正文
禁止修改Excel当前工作薄所有工作表单元格数据的VBA源代码         ★★★★

禁止修改Excel当前工作薄所有工作表单元格数据的VBA源代码

作者:闵涛 文章来源:闵涛的学习笔记 点击数:1471 更新时间:2009/6/9 2:17:23

  关于禁止修改工作表数据的方法,俺已在很多地方看到过,并且已学会!

  但,终究觉得不适合自己的需求,有很多介绍的方法,说的都是如何加密工作表,加密数据区域,然后再怎么设置密码等,使用此方法来禁止修改任何数据!

  以上的这种方法,针对的仅仅是当前的工作表而已,如果您的工作薄有相当多的工作表,您要禁止别人修改数据,你每个工作表都要手动设置吗?如果没啥好办法,可以手动完全设置看看瞧,工作表一多,人都烦了,哪里有心情再设置哈!

  俺也是受了一肚子窝囊气,觉得以上的方法不尽己愿,故而花了一下午时间,决心自己学习VBA,自己编写代码来解决自己的实际问题!小有所成,拿出来与大家分享先!

  如下图,为第一种代码!此代码放在“ThisWorkbook“模块里面!

  上述代码实现的功能是:无论您当前的工作薄有多少个工作表,无论您的工作表中有多少条数据,任何一个单元格的数据都无法修改!在不能修改数据的前提下,不弹出任何提示信息,仅将修改后的数据恢复到原来没有修改的状态,实现禁止修改的目的!

  在上图代码的基础上,加以分析再琢磨,就得出了如下图的代码了!此代码放在“ThisWorkbook“模块里面!

  上述代码实现的功能是:无论您当前的工作薄有多少个工作表,无论您的工作表中有多少条数据,如果要修改被限制的列的数据,则需要输入密码,密码正确则可以修改,密码错误则无法修改!在不能修改数据的前提下,不弹出任何提示信息,仅将修改后的数据恢复到原来没有修改的状态,实现禁止修改列数据的目的!


[Web开发]修改dede v5.7版本网站地图与rss存放路径  [Web开发]asp函数:创建数据表/创建列/添加字段/修改字段/A…
[Web开发]ASP添加、删除、修改、数据表SQL语句  [MySql]修改mysql导入文件大小限制
[办公软件]这样来修改PowerPoint超级链接的文字颜色  [办公软件]如何设置(更改、修改)PowerPoint中图片的版式(排版…
[办公软件]如何在PowerPoint中插入艺术字、修改艺术字、删除…  [办公软件]通过调整幻灯片的位置就可以修改幻灯片的序号
[办公软件]如何修改PowerPoint自定义动画的顺序  [办公软件]Office文档(Word,PPT)的作者、备注、最后修改时间…
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · 办公软件  · 系统软件
    · 常用软件  · 聊天工具
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台