自動(dòng)記錄數(shù)據(jù)錄入時(shí)間不懂得VBA的朋友可以看看（vba 記錄執(zhí)行時(shí)間）

在日常工作中，經(jīng)常會(huì)遇到需要實(shí)時(shí)記錄數(shù)據(jù)錄入的時(shí)間問題。

有朋友會(huì)說了，用快捷鍵啊，按Ctrl+；（分號(hào)）可以返回當(dāng)前的系統(tǒng)日期，按Ctrl+Shift+；（分號(hào)）可以返回當(dāng)前的系統(tǒng)時(shí)間。

但是如果需要同時(shí)返回日期和時(shí)間又該怎么處理呢？

對(duì)于懂得VBA的朋友，這個(gè)問題當(dāng)然不在話下，但相對(duì)于V盲的表親來說，處理這個(gè)問題就有點(diǎn)棘手了。

以下圖為例，在A列單元格輸入或是修改內(nèi)容后，B列就會(huì)自動(dòng)的顯示出數(shù)據(jù)錄入、更改時(shí)的時(shí)間。

接下來，咱們就一起學(xué)習(xí)一下如何實(shí)現(xiàn)這樣的目的。

B2單元格輸入以下公式，向下復(fù)制。

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

先簡(jiǎn)單說一下公式的意思。

NOW()函數(shù)返回日期時(shí)間格式的當(dāng)前日期和時(shí)間。

先用IF函數(shù)判斷A2是否為空值，如果A2是空值返回空文本""，否則執(zhí)行下一段公式：

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

公式中CELL("contents")部分，可以獲取最后編輯的單元格內(nèi)容。

再用IF函數(shù)判斷，如果A2等于最后編輯的單元格內(nèi)容，公式返回當(dāng)前的系統(tǒng)日期時(shí)間，否則仍然等于B2原有的值不變。

輸入公式后，如果馬上在A2單元格輸入內(nèi)容，會(huì)彈出循環(huán)引用的警告：

先關(guān)閉警告對(duì)話框。

然后依次單擊【文件】→【選項(xiàng)】，在【Excel選項(xiàng)】對(duì)話框里單擊【公式】選項(xiàng)卡，勾選“啟用迭代計(jì)算”。

設(shè)置完畢，只要在A列輸入內(nèi)容或是對(duì)已有的數(shù)據(jù)進(jìn)行更改，B列就會(huì)記錄下數(shù)據(jù)錄入時(shí)的時(shí)間。

如果您的工作表中顯示的是類似41672.55這樣的怪怪的數(shù)字，記得設(shè)置一下單元格格式。

按Ctrl+1，在彈出的【設(shè)置單元格格式】對(duì)話框中單擊【自定義】選項(xiàng)，在類型文本框中輸入以下格式代碼：

yyyy-m-d h:mm:ss

如果A列錄入的數(shù)據(jù)有重復(fù)，使用以上公式就會(huì)出現(xiàn)問題了，想一想應(yīng)該怎么處理呢

版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容，請(qǐng)聯(lián)系我們jiasou666@gmail.com 處理，核實(shí)后本網(wǎng)站將在24小時(shí)內(nèi)刪除侵權(quán)內(nèi)容。