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í)間跟隨修改而變化，也可以讓它保持不變。
不懂？來看看動(dòng)圖：
相對(duì)于手工錄入時(shí)間，自動(dòng)記錄修改時(shí)間效率更高，錯(cuò)誤幾率更小。
還是不懂？沒關(guān)系。我們來看具體案例。
對(duì)了，如果你想系統(tǒng)性學(xué)習(xí) Excel，掌握更多Excel 技能。
正好，我們家的《秋葉 Excel 3 天集訓(xùn)營(yíng)》專為職場(chǎng)人準(zhǔn)備，全部基于職場(chǎng)真實(shí)表格案例設(shè)計(jì)，還有很多超實(shí)用 Excel 技巧教學(xué)。
每天學(xué)習(xí)大概?30 分鐘，3 天時(shí)間，你也有可能成為 Excel 高手！
秋葉 Excel 3 天集訓(xùn)營(yíng)
原價(jià)?99 元?
?現(xiàn)在?僅需 1 元?
?
報(bào)名即送
【35 個(gè)常用函數(shù)說明】
趕緊掃碼預(yù)約吧！
??????
修改數(shù)據(jù)，日期時(shí)間變化
秋葉小店需要記錄報(bào)單和產(chǎn)品出入庫(kù)時(shí)間，如果有出入庫(kù)情況，還得修改庫(kù)存。如下圖：
（為了更好地演示，這里僅展示部分?jǐn)?shù)據(jù)。）
但是，由于產(chǎn)品數(shù)量太多，每次記錄都要多次核查，總擔(dān)心時(shí)間沒有記、記錯(cuò)了、庫(kù)存數(shù)量沒有更改等等，特別麻煩。
怎么辦呢？
這時(shí)，我們就需要用到「自動(dòng)記錄時(shí)間」的小技巧了，而且，還需要讓日期和時(shí)間隨著數(shù)據(jù)的修改而變化。
這樣就可以清楚地知道，庫(kù)存、入庫(kù)/出庫(kù)有沒有登記好。
以后再打開時(shí)，還可以看到上一次修改的時(shí)間，便于盤點(diǎn)。
怎么做呢？我們可以用 VBA 代碼。?
VBA？！?
淡定，別慌。?
不用自己寫，網(wǎng)絡(luò)上已經(jīng)有很多大佬寫的現(xiàn)成代碼，我們只需套用即可。?
?? 來看看操作步驟：
? 打開 VBA。?
按【Alt】+【F11】打開 VBE 窗口，即 VBA 的編程工具，我們?cè)谶@里編寫 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 SubIf 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)行采購(gòu)工作，同時(shí)需要記錄好采購(gòu)時(shí)間，如下圖：
由于每次采購(gòu)的種類太多，時(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ù)不同的場(chǎng)景需求，可以選擇不同的方法：
? VBA 法：修改數(shù)據(jù)后，日期時(shí)間隨之變化。
? 函數(shù)法：修改數(shù)據(jù)后，日期時(shí)間保持不變。?
之后遇到需要用 Excel 記錄時(shí)間的場(chǎng)景，一定記得來看看這篇文章哦~
??Tips：
? 為了不影響其他公式，在關(guān)閉啟用了「迭代計(jì)算」的表格之前，先取消勾選，再次打開時(shí)啟用。
? 為了避免丟失，建議在錄入完成后，用「選擇性粘貼-數(shù)值」的方法，把已生成的時(shí)間記錄由公式改為純數(shù)值。
