「一万小时定律」工具--使用Excel APP配置时间记录管理应用
-那么多的现成的手机应用,为啥要用Excel做?-
先前看李笑来的一本书,读到关于苏联的一位昆虫学家柳比歇夫使用“时间统计法”记录一生的段子,有点触动想恢复时间记录管理的习惯。用过一些记录型应用例如iHour记录应用进行时间管理,终是觉得无法遂意,没法百分百地支持个人定制的条目添加及统计功能。另外也是意志薄弱,也没有坚持下来。想来因为没有投入成本,一定程度上倾向于放弃使用得来容易的应用产品。所以,决定花点功夫,做张顺手的表格,并使用移动端的Excel APP进行录入时间纪录条目,兴许是个可行的办法。再者,老婆觉得我老是存不下来钱,所以除了时间记录的表格外,捎带手就加了个消费记录的Sheet。用了几周后,分享点不成熟的小心得。
-用Excel咋整?录入体验和统计功能如何?-
录入的界面和统计报表长这样(如下),其实就是张存在OneDrive里的Excel表、使用Excel APP在移动端录入,并定期在PC端拉个透视表瞅瞅上个周期干了啥。
其中类别和二级事项用Indirect函数做了二级数据有效性验证,所以录入体验相对较好,可以使用下拉菜单选择,也支持自定义录入。在时间录入这项,原来的版本中是要手动录入日期的,体验太差所以用Now函数直接生成当前的日期,再用Year、Month和Day函数来拆,以便用透视表统计。但使用过程中发现一个问题,每次录入新的数据,Now函数会重新计算把原有的时间数据全更新为当前的时间。所以在前期的版本中,曾尝试搜索了几行简单的VBA代码实现:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then '内容在第3列
If Target = "" Then
Target.Offset(0, 1) = ""
Else
Target.Offset(0, 1) = Format(Now, _
"yyyy-mm-dd hh:mm:ss") 'A列记录时间
End If
End If
End Sub
但是,表格上传到OneDrive在Excel APP里打开时,发现移动端不支持宏…然并卵。只能回头来解决Now函数生成日期后的固定问题,发现只能用数据有效性的设置来解决,这个解决方案也并不完美:虽然可以直接生成日期与时间信息,但用户需要在日期这列里点击一下下拉菜单并选择这个时间信息后,才能固定这条数据,最后的效果如下:
本人算是Excel小白,有可改进的地方,大家帮忙支招,如果觉得还不错,可以留邮箱要表格文件。类别和项目的配置,可以在参数表中添加,加入项目内容后,在“公式”下找“根据所选内容创建”并如图点击“确定”即可完成配置:
先前看李笑来的一本书,读到关于苏联的一位昆虫学家柳比歇夫使用“时间统计法”记录一生的段子,有点触动想恢复时间记录管理的习惯。用过一些记录型应用例如iHour记录应用进行时间管理,终是觉得无法遂意,没法百分百地支持个人定制的条目添加及统计功能。另外也是意志薄弱,也没有坚持下来。想来因为没有投入成本,一定程度上倾向于放弃使用得来容易的应用产品。所以,决定花点功夫,做张顺手的表格,并使用移动端的Excel APP进行录入时间纪录条目,兴许是个可行的办法。再者,老婆觉得我老是存不下来钱,所以除了时间记录的表格外,捎带手就加了个消费记录的Sheet。用了几周后,分享点不成熟的小心得。
-用Excel咋整?录入体验和统计功能如何?-
录入的界面和统计报表长这样(如下),其实就是张存在OneDrive里的Excel表、使用Excel APP在移动端录入,并定期在PC端拉个透视表瞅瞅上个周期干了啥。
![]() |
![]() |
其中类别和二级事项用Indirect函数做了二级数据有效性验证,所以录入体验相对较好,可以使用下拉菜单选择,也支持自定义录入。在时间录入这项,原来的版本中是要手动录入日期的,体验太差所以用Now函数直接生成当前的日期,再用Year、Month和Day函数来拆,以便用透视表统计。但使用过程中发现一个问题,每次录入新的数据,Now函数会重新计算把原有的时间数据全更新为当前的时间。所以在前期的版本中,曾尝试搜索了几行简单的VBA代码实现:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then '内容在第3列
If Target = "" Then
Target.Offset(0, 1) = ""
Else
Target.Offset(0, 1) = Format(Now, _
"yyyy-mm-dd hh:mm:ss") 'A列记录时间
End If
End If
End Sub
但是,表格上传到OneDrive在Excel APP里打开时,发现移动端不支持宏…然并卵。只能回头来解决Now函数生成日期后的固定问题,发现只能用数据有效性的设置来解决,这个解决方案也并不完美:虽然可以直接生成日期与时间信息,但用户需要在日期这列里点击一下下拉菜单并选择这个时间信息后,才能固定这条数据,最后的效果如下:
![]() |
本人算是Excel小白,有可改进的地方,大家帮忙支招,如果觉得还不错,可以留邮箱要表格文件。类别和项目的配置,可以在参数表中添加,加入项目内容后,在“公式”下找“根据所选内容创建”并如图点击“确定”即可完成配置:
![]() |
© 本文版权归 cruisererer 所有,任何形式转载请联系作者。
© 了解版权计划