大家好，我是懂點(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í)間跟隨修改而變化，也可以讓它保持不變。

不懂？來看看動(dòng)圖：

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

還是不懂？沒關(guān)系。我們來看具體案例。

對了，如果你想系統(tǒng)性學(xué)習(xí) Excel，掌握更多Excel 技能。

正好，我們家的《秋葉 Excel 3 天集訓(xùn)營》專為職場人準(zhǔn)備，全部基于職場真實(shí)表格案例設(shè)計(jì)，還有很多超實(shí)用 Excel 技巧教學(xué)。

每天學(xué)習(xí)大概?30 分鐘，3 天時(shí)間，你也有可能成為 Excel 高手！

秋葉 Excel 3 天集訓(xùn)營

原價(jià)?99 元?

?現(xiàn)在?僅需 1 元?

?

報(bào)名即送

【35 個(gè)常用函數(shù)說明】

趕緊掃碼預(yù)約吧！

??????

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

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

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

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

怎么辦呢？

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

這樣就可以清楚地知道，庫存、入庫/出庫有沒有登記好。

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

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

VBA？

！?淡定，別慌。?

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

?? 來看看操作步驟：?

? 打開 VBA。?

按【Alt】+【F11】打開 VBE 窗口，即 VBA 的編程工具，我們在這里編寫 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ì)問，如果我不需要日期時(shí)間隨著修改的數(shù)據(jù)而變動(dòng)，該怎么辦？?

別急，我們來看第二個(gè)案例??

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

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

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

這時(shí)，就可以用到上面說的「自動(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ù)的值；否則返回原來的值。（避免因電腦時(shí)間改變，B2 單元格中的內(nèi)容也變了。）?

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

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

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

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

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

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

總結(jié)一下

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

根據(jù)不同的場景需求，可以選擇不同的方法：

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

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

之后遇到需要用 Excel 記錄時(shí)間的場景，一定記得來看看這篇文章哦~

??Tips：

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

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