設(shè)置
  • 日夜間
    隨系統(tǒng)
    淺色
    深色
  • 主題色

如何用 Excel 自動(dòng)記錄時(shí)間

秋葉Excel 2023/2/12 12:31:12 責(zé)編:夢(mèng)澤

原文標(biāo)題:《1 分鐘!學(xué)會(huì)用 Excel 自動(dòng)記錄時(shí)間,告別手動(dòng)低效!》

大家好,我是懂點(diǎn) Excel 的小蘭~

Excel 中,有許多「自動(dòng)」功能,可以大幅提高表哥表姐們的辦公效率,例如:

? 自動(dòng)標(biāo)亮整行數(shù)據(jù)。

? 自動(dòng)合并工作表。

? 到期自動(dòng)提醒。

……

今天要給大家講的,也是一個(gè)「自動(dòng)」功能:

在 Excel 中輸入數(shù)據(jù)后,會(huì)自動(dòng)記錄時(shí)間。修改數(shù)據(jù)后,既可以讓日期時(shí)間跟隨修改而變化,也可以讓它保持不變。

不懂?來(lái)看看動(dòng)圖:

▲ 修改數(shù)據(jù),日期時(shí)間變化

▲ 修改數(shù)據(jù),日期時(shí)間不變

相對(duì)于手工錄入時(shí)間,自動(dòng)記錄修改時(shí)間效率更高,錯(cuò)誤幾率更小。

還是不懂?沒(méi)關(guān)系。我們來(lái)看具體案例。

修改數(shù)據(jù),日期時(shí)間變化

秋葉小店需要記錄報(bào)單和產(chǎn)品出入庫(kù)時(shí)間,如果有出入庫(kù)情況,還得修改庫(kù)存。如下圖:

(為了更好地演示,這里僅展示部分?jǐn)?shù)據(jù)。)

但是,由于產(chǎn)品數(shù)量太多,每次記錄都要多次核查,總擔(dān)心時(shí)間沒(méi)有記、記錯(cuò)了、庫(kù)存數(shù)量沒(méi)有更改等等,特別麻煩。

怎么辦呢?

這時(shí),我們就需要用到「自動(dòng)記錄時(shí)間」的小技巧了,而且,還需要讓日期和時(shí)間隨著數(shù)據(jù)的修改而變化。

這樣就可以清楚地知道,庫(kù)存、入庫(kù) / 出庫(kù)有沒(méi)有登記好。

以后再打開(kāi)時(shí),還可以看到上一次修改的時(shí)間,便于盤點(diǎn)。

怎么做呢?我們可以用 VBA 代碼。

VBA?!

淡定,別慌。

不用自己寫(xiě),網(wǎng)絡(luò)上已經(jīng)有很多大佬寫(xiě)的現(xiàn)成代碼,我們只需套用即可。

?? 來(lái)看看操作步驟:

? 打開(kāi) VBA。

按【Alt】+【F11】打開(kāi) VBE 窗口,即 VBA 的編程工具,我們?cè)谶@里編寫(xiě) VBA;

? 將下面的代碼復(fù)制到【Sheet2】(數(shù)據(jù)所在工作表)的代碼窗口中。

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Row = 1 Then Exit Sub
If Target.Column Mod 2 > 0 Then Exit Sub
If Target = "" Then Target.Offset(, 1) = "" Else Target.Offset(, 1) = Now
End Sub

PS:注意代碼不要放錯(cuò)工作表。

? 關(guān)閉窗口即可。

之后,在偶數(shù)列輸入數(shù)據(jù),后面一列就會(huì)自動(dòng)顯示時(shí)間。

最后,將表格文件保存為 Excel 啟用宏的工作?。?.xlsm)(注意:一定要保存為 Excel 啟用宏的工作?。?.xlsm))

好啦,這個(gè)小技巧就講到這里了~

有同學(xué)會(huì)問(wèn),如果我不需要日期時(shí)間隨著修改的數(shù)據(jù)而變動(dòng),該怎么辦?

別急,我們來(lái)看第二個(gè)案例

修改數(shù)據(jù),日期時(shí)間保持不變

小竹每周需要進(jìn)行采購(gòu)工作,同時(shí)需要記錄好采購(gòu)時(shí)間,如下圖:

由于每次采購(gòu)的種類太多,時(shí)間緊,產(chǎn)品名稱和時(shí)間非常容易弄錯(cuò)。

這時(shí),就可以用到上面說(shuō)的「自動(dòng)記錄時(shí)間」的小技巧了。

并且,如果產(chǎn)品名稱不小心打錯(cuò)了,修改數(shù)據(jù)之后,日期和時(shí)間也能保持之前的不變。

?? 操作方法:

? 選中 B2 單元格,輸入公式:

=IF(A2="","",IF(B2="",NOW(),B2))

PS:A2 是輸入產(chǎn)品名稱的單元格,B2 是輸入時(shí)間的單元格,可根據(jù)實(shí)際需要進(jìn)行修改。

公式含義:

=IF(A2="","",IF(B2="",NOW(),B2))

如果 A2 單元格為空,則 B2 單元格也為空;如果 A2 單元格有內(nèi)容,則顯示第二個(gè) IF 函數(shù)的值。

第二個(gè) IF 函數(shù)的含義是,如果 B2 單元格為空,則顯示 NOW 函數(shù)的值;否則返回原來(lái)的值。(避免因電腦時(shí)間改變,B2 單元格中的內(nèi)容也變了。)

? 下拉填充到其他單元格。

? 公式存在循環(huán)引用,因此需要允許 Excel 進(jìn)行迭代計(jì)算。

打開(kāi)【文件】-【選項(xiàng)】-【公式】,勾選「啟用迭代計(jì)算」,確定。

? 將 B 列的單元格格式設(shè)置為日期時(shí)間。

選中 B 列,【Ctrl+1】打開(kāi)設(shè)置單元格格式,選擇「日期」-「2012/3/14 13:30」。

之后,在 A 列輸入數(shù)據(jù),B 列就會(huì)自動(dòng)記錄時(shí)間了。

總結(jié)一下

本文主要講了「輸入數(shù)據(jù),自動(dòng)記錄時(shí)間」的 2 種方法。

根據(jù)不同的場(chǎng)景需求,可以選擇不同的方法:

? VBA 法:修改數(shù)據(jù)后,日期時(shí)間隨之變化。

? 函數(shù)法:修改數(shù)據(jù)后,日期時(shí)間保持不變。

之后遇到需要用 Excel 記錄時(shí)間的場(chǎng)景,一定記得來(lái)看看這篇文章哦~

 Tips:

? 為了不影響其他公式,在關(guān)閉啟用了「迭代計(jì)算」的表格之前,先取消勾選,再次打開(kāi)時(shí)啟用。

? 為了避免丟失,建議在錄入完成后,用「選擇性粘貼-數(shù)值」的方法,把已生成的時(shí)間記錄由公式改為純數(shù)值。

本文來(lái)自微信公眾號(hào):秋葉 Excel (ID:excel100),作者:竺蘭

廣告聲明:文內(nèi)含有的對(duì)外跳轉(zhuǎn)鏈接(包括不限于超鏈接、二維碼、口令等形式),用于傳遞更多信息,節(jié)省甄選時(shí)間,結(jié)果僅供參考,IT之家所有文章均包含本聲明。

相關(guān)文章

關(guān)鍵詞:Excel教程,Excel學(xué)院

軟媒旗下網(wǎng)站: IT之家 最會(huì)買 - 返利返現(xiàn)優(yōu)惠券 iPhone之家 Win7之家 Win10之家 Win11之家

軟媒旗下軟件: 軟媒手機(jī)APP應(yīng)用 魔方 最會(huì)買 要知