作者： Aar0n

输入重复值时提示

• 宏代码 • 8 条评论 • •6,937 次查阅

平时在输入大量数据时，在同一列中自上往下输入，一不注意可能会输入重复项。 有没方案能提示输入重复呢？ 有2种方案：一个是函数countif在数据有效性中定义，另一个是VBA宏代码。 先来写写函数方法： 比如我们是在B列中输入数据的那范围就是B1~B65536，在数据有效性中使用自定义，在公式中输入：=COUNTIF($B$1:$B$65536,B1)=1,随之向下填充，当输入重复值会提示，并清空当前输入值。 VBA代码：   Private Sub Workbook

碎碎周末

• Diary • 18 条评论 • •13,468 次查阅

今天是唯一一个有懒觉睡的周末，不用学车，不用陪人去医院。 自然醒睡到8点半，发现今天是月末了，有件事情没做–理发，现在是一个月理一次，一次不理就觉得少做了点什么，养成习惯了。 赶紧起床，洗刷，喝了点稀粥出门理发去了，此时太阳已经有点大了，晒到身上挺热乎的。 来到理发店，找了我的指定发型师，一年半了都是他一个人帮我剪的。 大约剪了半小时，终于剪完了。从理发厅出来，去超市买点东西，顺便帮老弟带几节无线鼠标的电池。 超市出来，又跑到电脑店，买了20米的网线，折腾啊。楼上太闷了，我想把路由器

真爱出现在几时？

• Psychology • 6 条评论 • •5,601 次查阅

想写点自己的境况，提笔却无心写下去，内心不够平静，还是转载篇苏芩的文章分享给大家，觉得写的不错，不敢独享。 说起最理想的婚姻状态，每个人的观点都差不多：最爱一个“心灵伴侣”。 能有共同语言，才能有让彼此坚定相爱下去的信念。 大多数人苦恼的是：这样一个人，总是迟迟遇不到。 年轻时，遇不到那个人，迫于年龄压力，不得不选择进入婚姻。 当为人夫为人妻、一切板上钉钉之后，那个人忽然出现了。一刹那的惊喜，最终还是要面对失落。到了此时此刻，责任要求你，不得不说“放弃&rdq

VBA填充空单元格

• VBA • 7 条评论 • •7,194 次查阅

通常很多人在输入数据时，在同一列中相同的数据都会选择不输（如A1输入X,一直空到A5，则A2~A4都是表示X），空白表示相同。偷懒的想法啊。 但为了输入方便偷懒了，能不能交给代码补全呢？ 可以的！ 分享代码吧：   Sub 填充单元格()    On Error Resume Next    Intersect([a:a], ActiveSheet.UsedRange).SpecialCells(

VBA自动定位下一个非空单元格

• VBA • 17 条评论 • •12,844 次查阅

如何实现每次输入数据后总是定位于下一行的第一个空单元格避免键盘方向键左右移动呢？ 比较老实的办法是在常规里面设置方向，但是缺点是输入完成后始终朝某个方向前进，不会换行。 如何实现我们上面的需求？分享个代码： Private Sub Worksheet_Change(ByVal Target As Range)      If Target.Count = 1 Then

18条情场潜规则

• Psychology • 6 条评论 • •5,931 次查阅

潜规则这词越来越普遍了，最早应该出现在娱乐圈吧,今天分享篇苏芩的情场潜规则博文。 不论多么死正经的男人，都会有死不正经的另一面。 男人没钱的时候想结婚，为了省钱。 男人有钱的时候不在乎结不结婚，因为不差钱，多少姑娘都约得起。 男人口口声声说不在乎女人的过去，说这话的男人，一定还是没有真正得到过这个女人。 男人的人生理想是有钱、有后。男人喜欢的女人要“有前有后”。 女人开始想到换发型，说明她开始想换爱情了。 一个女人频频更换发型，说明她最近遇上了一个很难搞定的男人。 提到结

加载更多