在EXCEL选项中选中”自动重算“和”迭代计算“，将”最多迭代次数“设为1，然后在A1输入公式：=IF(CELL("address")="$B$"&ROW(),TEXT(NOW(),"hh:mm:ss"),A1)将公式向下复制。
只能用vba的方法，用函数取得的时间每天会变
最方便的方法是VBA代码的Change事件。
