Excel插入时间(精确到秒)

来源:互联网 发布:网络信息都可信吗 编辑:程序博客网 时间:2024/05/16 11:34
    给Excel中分别插入日期和时间(时间要求精确到秒),以为会很简单的.

 

    以前没有用过这个功能,时间都是手动输的.所以上网查了下,用[Ctrl+;],可以插入日期,样式如此2013/9/18,这个符合我的要求了.而[Ctrl+Shift+;],可以插入时间,但是却只能精确到分,如17:40.如果修改单元格格式,设置成hh:mm:ss这种样式,也只能变成17:40:00,多个00而已,并不能显示精确的秒.

 

    还有一个Now()函数,=Now(),可以出现我想要的效果.就是=Now()之后,修改单元格格式为"hh:mm:ss",或者写成=text(Now(),"hh:mm:ss"),这样就可以了.但是这个是可变的,根据当前的时间,会变动.跟他差不多的还有一个=today()函数,他们会根据当前时间改变.想要他不变,也是可以的,比如取巧点的,你也可以,粘贴复制,然后按值粘贴,也是可以获得想要的效果的,就是太麻烦了.改格式,复制粘贴,还得按值粘贴.

 

    或者考虑用输入法的功能,比如搜狗输入法,输入sj(时间的首字母,中文状态下),产生这种2013年9月18日17:46:03,或者这种2013-9-18 17:46:21效果.或者输入rq(日期的首字母,中文状态下),2013年9月18日,2013-9-18,这种都是可以选择的.但是日期还是不符合要求,尽管有秒了.

    或者考虑换种输入法,听说百度输入法,输入rq就可以产生我要的效果,但是吧,我懒得换输入法啊.

       

    找了一些方法,最后用了宏这种东西解决的.挺简单的就是两句代码,然后设置下快捷方式,就可以用了.

ActiveCell.Value=Now()  '设置当前活动单元格的值为NowSelection.NumberFormatLocal="hh:mm:ss" '设置当前选中的单元格的格式为hh:mm:ss 

    但是这种方式也不好,因为他要我保存成带宏的Excel,扩展名为.xlsm,要不然关闭,再打开后就什么也没有了.不过尽管还是不是很完美,但这也是我找到的,除了换输入法外,最简单的了.

 

    其他还有什么人说,可以弄个日历控件,或者拖个command控件什么的,具体没有深究. 而且发现按ctrl+F11,Excel会报时,很好玩.