平时大家在处理各种账目表时，时不时要插入一张张工作表，今天思路一开，如果能记录每张工作表的插入时间，那就相当于给每张表建立一个出生档案。 代码如下： Private Sub Workbook_NewSheet(ByVal Sh As Object) Dim R As Long R = Range("A65536"
月度归档： 2011 年 6 月
你躲得过前任的暧昧吗？
老写代码多无聊哈，我也不想我的整个博客页面全部都是关于VBA什么的，太没激情了。今天咱们分享下别的，特来分享下苏芩的一部分文摘，未摘录全文，只是节选部分，重新修改封装： 大S的婚礼在大家的眼里本是个完美的结局，但过后不满百日，一个美艳的“前任”打破了这一切！ 不过，这也是男人的属性：男人比女人更加难忘旧情。尤其是对自己曾经征服过的女人，永远永远，不可能做到彻底忘怀！之前的恋爱也许会不成功，往往多年之后、等他变得更成熟稳重
VBA限制工作簿保存
前面几天写了禁止工作簿打印、复制粘贴操作，今天晚上就偶兴写个禁止保存吧。 大家生活中给大家看数据，就怕有些人手痒，会动你的键盘什么的，导致表格数据被篡改，今天分享下只能看工作簿，修改了也不能保存的方法。 上代码： Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) MsgBo
什么是婚姻？
很多人问：“什么是婚姻？” 答案是：婚姻不是快乐不是享受，婚姻是恒久的忍耐。 想要结婚，第一步先问问自己：忍功修炼得如何？ 同时还不要认为“忍”是件可怕的事情，忍，也是种成熟的表现，用更专业的术语来讲，这是一种情绪上的延迟发作。 女人常抱怨：“结婚了，他对我反应越来越慢。” 其实这是好事！ 结婚后，反应慢一点、行动慢一点、嘴比脑子慢一点……只有让自己不冲动的去做任何一件事，才算是加上了婚姻的保险锁
限制Excel表中进行复制粘贴操作
昨天写了篇关于VBA限制打印的文章，本意是为了保护数据不被他人打印，今天上善若水同学却给我提出了另外一个问题—-让excel中的数据保密，不能被复制和粘贴呢？ 我想了下有2个方案，一个是利用保护工作表实现，另一个当然就是我所说的利用VBA代码了。 第一种保护工作表方案实现起来比较简单（适合懒人）。 具体步骤：工具-保护–保护工作表–在“允许此工作表的所有用户进行”的下拉框中选择全部为不选中，保护工作表。搞定！此时不管你点哪里都不能进行数
VBA限制工作簿打印
两天端午放假，居然休息成感冒了，难受啊！鼻涕一把一把的！今天还是分享下VBA吧。 在实际生活中，我们要向别人展示一些数据，但只希望对方看Excel表格就够了，可有的人为了方便自己会选择打印整张表格带走！ 为了数据安全起见，教大家一个限制EXCEL工作簿打印的代码： Private Sub Workbook_BeforePrint(Cancel As Boolean) MsgBox "此乃保密数据，
荡涤你灵魂的句子-系列三
承接上次荡涤灵魂系列一、二： 61.不该看的不看，不该说的不说，不该听的不听，不该想的不想，该干什么干什么去 62. 一个人能走多远，要看他有谁同行；一个人有多优秀，要看他有谁指点；一个人有多成功，要看他有谁相伴。 63. 叹气是最浪费时间的事情，哭泣是最浪费力气的行径。 64. 我可以选择放弃，但是我不能选择放弃！ 65. 不是人人都能活的低调，可以低调的基础是随时都能高调。