liujinli0712的博客

Sub清除密码()

Sub工作薄间工作表合并

早上起来，一边换衣服一边想，今天天气这么好，应该去哪吸吸氧、散散心，一度肥肠激动再一想，我好像好像好像……还有一个报告需要写……可我真的想出去玩哎呀我裂开了呀……

人家说不吃学习的苦，就要吃生活的苦，主动吃苦好过被动吃苦。

“绝不吃亏，决不让步，绝不牺牲自己，据说是强者的要素。” — — 严歌苓

从这节课开始，我们一起学习工作表、工作簿以及程序的事件实例。应用场景：年终考核，组织大家开展民主测评投票，投票分四个档次（A\B\C\D），拿到回收来的票后就需要统计我们每个人拿到的各档次评分情况，常规的做法是张罗一个唱票人+一个计票人，再找一张统计表或大黑板，傻fufu地完成这项工作。那么我们最开始学VBA的时候就说了，不要看上去那么傻！我们来看一下如何用事件程序来完成这项操作。代码所在工作表的初始内容： A列 B列 C列 D列 1 年终考核民主测评统计.

每个人都必须在工作与闲暇之间作出某种组合的选择：既可以选择较多的工作以增加货币收入（RMB），也可以选择较多的闲暇以增加可自由支配时间。闲暇是指时间的非市场性质的使用，不仅包括吃饭、睡觉、娱乐等，也包括所有的家务劳动。

Range.Merge 方法：由指定的Range对象创建合并单元格（一）对选择的区域进行合并Sub 合并单元格() Selection.Merge '对选中的单元格区域执行此段代码，进行合并，仅保留左上角值End Sub**********************（二）对相同相邻单元格进行合并原料如下：部门 职工 职级 1部门 张小跳 5 1部门 李大刀 7 1部门 王老虎 8...

她来了她来了，她带着新博客走来了。我好像一直都没有闲下来过，上学的时候实习接着实习，工作的以后任务接着任务。最近被金钱腐蚀，没顾上更博。但曙光已在眼前，过了7月中旬，我就解放了，然后就可以开始执行今年的Flag啦。过了7月12日，我就入职满一年可以转正啦哈哈哈，求升职加薪！！！（字搞得亮眼一些，让全网都看到）有时候看到单位的“老人”，总是觉得他们的生活没有意思，虽然不缺钱不缺房不缺职位不缺权，可缺青春缺灵气。现下的我，即便没有很多钱，但生活真的好有意思。没钱也不是坏事，人要是没点儿奔头，那努

今天原本没计划写博客，但电脑带都带回来了，要是不用它做点事情，总觉得亏哈太阳是真的晒呀，早上迎着太阳上班，下午迎着太阳下班，一天烤两次，真要变黑了。等我变成小黑孩的时候，没有一根紫外线是无辜的！

老师问小鱼：“你这次考试作弊了吧，老实说你抄谁的？” 小鱼回答：“老师，我抄蚌的……” 老师：“你棒个屁！”

如果你有很多想做的事情，又不可能兼顾所有事，请学会：取舍与放弃、规划与协调、叫停与思考。

前面介绍了三种引用方式，Range、Cells、[单元格区域]，这里做了一下简单的对比

（夏天，多听听苏打绿，快乐感up）“汗水在他的身上化成了彩虹 步伐的节奏延续生命的河流 默默在岗位战斗的每个小小英雄”

前天（上周五）上午，到新办公区去试钥匙，跟领导开始了看风水大赛，哈哈哈哈真的搞笑部门的新办公室是一大间，单位给部门配了4个衣柜、7个文件柜、7张桌子（咱也不知道给配这么多桌子干哈 ：）跟领导、同事简单把家具归拢了归拢以后，基本形成了如图所示的布局。图中，红色的是衣柜、绿色的是文件柜（比衣柜薄）、黄色的是桌子、米色的是柱子。没画出来的仨桌子，暂时也都用不到呢。为我惊人的画工点赞！不愧是在工地上跑大的女明星！

今天的题：你答应周日陪女友逛街。今天周六，明天就是周日了。不过今晚你会和哥们通宵打游戏，明天如果不补觉和女友出去逛，搞不好会猝死。思来想去，你_________。（答案在本文末尾公布）

人是不是都这样（捂脸）：越不能干嘛的时候就越想干嘛。原来能吃能喝的时候，没觉得有那么多想吃的，现在戴着紧箍咒，吃啥都不方便了，反而啥都想吃。最近迷上了看内蒙古天乐（米饭屠夫面条杀手农民伯伯的好帮手）的吃播，看视频看的特别想吃凉皮、凉拌菜和寿司。

Range 对象，代表某一单元格、某一行、某一列、某一选定区域（该区域可包含一个或若干个单元格）

单元格是Excel中最小的一个单位，几个概念的范围大小依次是：工作簿＞工作表＞行/列＞单元格，单元格是我们操作得最多的一类对象。Excel 2016版里，每个工作簿的单元格行数：104 8576，列数：1 6384，单元格个数：104 8576 × 1 6384 = 171 7986 9181一个单元格内字符容量是32767个字符，实际上，我们根本用不到这么大的容量。VBA中单元格学习的重要性：（1）大部分的批量操作，都是在操作单元格；（2）单元格的表示方法与操作、信息获取方式，是使用V

这个功能，属于我的VBA入坑操作。由于该篇属于实操性较强的内容，为了让小白都能上手用，我这里放一点VBA的基础操作。使用情景：如题，将一个包含多工作表的工作簿拆分为单工作表工作簿文件原始文件描述：【旺旺大礼包.xlsx】中有三个工作表，分别是旺仔牛奶、旺旺仙贝、旺旺小小酥操作流程：打开旺旺大礼包.xlsx——在菜单栏的开发工具中找到Visual Basic入口——进入到VBE界面并确认代码窗口已打开输入代码：备注：该段代码已经测试，粘贴走之后唯一需要手动更改的地方就是标红

今天早上以为睡饱了，起身看手机才5:50，倒下重睡，第二次醒来就9:06，NICE！最近的睡眠质量很高，晚上困得比较及时，第二天早上可以按生物钟醒来，到单位都还算比较早。用鼠标拖选字的时候，发现不太灵了嘞，排除鼠标垫作祟，只能是电池的问题！果然！一节更比六节强！恢复好用。（一）工作表移动与复制表达式.Move(Before，After)表达式.Copy(Before，After)Sub 移动()Sheet1.Move , Sheet3 '...

我微信绑定着张工行卡，好多天没用过它付账了，因为有一次支付时被提醒了余额不足哈哈哈（丢脸）。微信支付吧，它有支付优先排序，我的排序一直是余额、工行零钱卡、建行信用卡，首选支付方式没余额时，它就会自动向后切换。余额花完了，工行卡里的零钱也花完了，这一段时间都在用信用卡支付。可这几天买东西，工行卡总冲在信用卡前面，我就会手动切换到信用卡去，避免重复余额不足的噩梦。然而，昨天晚上去烫店买菠萝，支付的时候又看到工行卡的候选项排在了前面，我寻思着莫非是还剩着十来块钱？

（一）基础操作1.新建工作簿Sub 新建工作簿()Dim wbk As Workbook '定义wbk为工作簿对象，因为它是一个对象，所以下局用Set来赋值Set wbk = Workbooks.Add '在Workbooks集合里新增这个工作簿wbk.SaveAs "c:\123.xls" '保存为C盘路径下的一个工作簿文件End S...

昨天下午，朋友给叫了奶茶外卖到单位楼下，再次确认，我确实不爱喝奶茶。无法体会奶茶女孩的快乐，甲之蜜糖乙之砒霜。 今天上午帮另一个朋友改了点东西。上大二的时候，我们并不认识，但当时共同参加了一个比赛，她得了第一，我得了第二，收奖状的时候是某个学生会的干事逐个送到我们手里的，我只对她的名字有点印象。到了大三，机缘巧合聚在了一起，确认了彼此身份。到现在，走上了各自的工作岗位，还有机会遇事共...

前一阵忙得厉害，有时候周末也来单位。这几天，领导总想给放假，在单位看到我总问“怎么又来了？”“明天没啥事别来了，在家休息休息”“要是上午没事就下午再来”“明天你值班呀，不然我还想给你放假呢”……诸如此类的……但有时候也会到办公室嘱咐我尽快写论文的事，感动中国……

你小时候，经历过某种关于认知的暴击吗？就恍若晴天霹雳的那种。作为一个在胡同里长大的娃，关于童年的记忆里，最深刻的就是几个小时候一块玩的“恶棍”们了。说来也怪，为什么我家的左右邻居都跟我爸妈是同一个年龄段？这直接导致我们这帮孩子也都年岁相近。西邻居家里有三个孩子，他家老二跟我是那种小时候的“死对头”，日常就是别着劲儿吵架。我在很长很长一段时间里是说不过她的，总是不擅长“辩理”，经常是“又没发挥好...

帅气的我，又出来营业了。如~果~说~你~是~海~上~的~泡~沫~我~就~是~海~底~的~学~习~狂~魔~

上篇做完手术，忘了告诉大家如何缝合伤口。在Excel中插入了宏的话，那么在保存文件的时候会收到来自大佬的提示：也就是说，.xls或者.xlsx格式的文件不具备“宏能力”，在这里，我们毙掉惯性思维，忽略默认选项，单击“否”，在弹出的另存为对话窗口中选择保存类型为“Excel启用宏的工作簿”（.xlsm格式）。完成保存工作，再打开该文件时，根据微软的安全警告，单击“启用内容”即可正...

为什么要学习VBA？答：因为不想在疯狂倒腾Excel的时候，被人看到觉得咱们很傻的亚子。如何快速学习VBA？答：慢慢来，比较快。但Excel只是VBA的应用场景之一，Office取得巨大成功的一个重要原因就是VBA，使用VBA可以完成很多事情，Office中的应用程序可以共享VBA语言，如果掌握了在Excel2016中使用VBA的方法，那么在Word、PPT中使用VBA会变得易...