公司的车管员是一个50岁的大叔，每天的公务出车明细都是手工记录的，密密麻麻几张纸，要统计每个人的出车次数即繁琐又容易出错，如果像图1一样，把这些手工记录录入到EXCEL表格里，统计起来就简单多啦。
通过分析得知，我们需要在A列相应的单元格输入出车日期，且每天出车人数不同，日期也不一定连续，那么这种日期输入有没有简单的方法呢？答案是肯定的，我们不妨请VBA来帮忙。
在请出VBA之前，我们先做两个前期准备工作，第一，制作标题和表头。第二，在A3单元格输入一个日期“9月3日”，并把A3及以下的单元格设置为日期格式。
接下来VBA闪亮登场：让我们按Alt+F11，打开VBE编辑器，复制下列代码，如图2
Subaa()
n = Range("a65536").End(xlUp).Row
n2 =Range("b65536").End(xlUp).Row + 1
Range("A" & n2) =Range("A" & n).Value + 1
EndSub
单击开发工具—插入—表单控件—按钮，插入一个按钮，并把宏aa指定给此按钮。
在输入完9月3日的出车人“吕布”和“关羽”后，单击按钮，VBA就会自动在A5帮你填写下一天的日期了，也就是9月4日，如果9月4日没有出车，你只需再继续单击按钮，日期就会递增，这样输入日期是不是简便了许多？你学会了吗？
代码解释：
第一句：把A列当前最后一个非空行的行号指定给变量n
第二句：把B列当前最后一个非空行下一行的行号指定给变量n2
第三句：把A列最后一个日期下一天的值输出到A列第n2行单元格
本期内容由【zmnyu】友情提供。欢迎大家把自己的分享、技巧拿出来和表亲们一起分享~~
………………………………………………………………………………
每天花一分钟，轻松赚回手机话费。亲，您还在为每个月的话费单发愁吗？别担心，学生赚能帮到您！只要下载应用就能获取收益，刚试了是绝对真实靠谱 您也来试下吧！http://www.xszhuan.com/t/13jc0z