Excel裡面的某列是日期，需要通過該列對比當前日期，或者對比通知(到貨)日期，根據這個情況，做一個提醒。方法很多，這裡介紹兩種通俗簡單的方法給大家，希望幫到了你。
工具/原料
Excel2013
其他操作版本類似
方法/步驟
首先模擬excel的內容，內容隨意輸入，這裡將B列設定為保質期，就是提醒的日期列。設定：B列與當前日期進行對比，如果當前日期超過B列日期，則會在C列出現“是”字樣的設定，用來提醒。
設定好之後，直接啟動VBA編輯環境，在環境裡面編寫程式碼，不用怕，一步一步說明白。首先按快捷鍵“Alt+F11”啟動VBA編輯器。第一次開啟，在左面是看不到模組，以及模組1的。常規excel開啟後，會可看到“sheet1”、“sheet2”、“sheet3”。(注：我的已修改，介面有所不同)
在左側導航視窗，點選右鍵，即可在彈出的選單中，選中“插入”，並在子選單中，選中“模組”，即可新增新的模組在VBA導航窗格，新增之後，雙擊模組，可在右側進行程式碼錄入。
我的程式碼編輯背景顏色已更改，所以你的介面可能和我不一樣，不過不影響程式碼的錄入，現在建立一個”子過程“。利用函式”sub”+空格+過程名稱即可建立。
設立2個變數，“Dim i As Long、Dim m_o As Integer”，所謂變數，就是對一些數字的別名。用一個名字代表一個事物。比如將數字1，我稱呼他為“i”，用程式碼表示，首先宣告有個事物，他叫“i”，Dim i As Long，然後i=1，就可以把i當作1來稱呼。但是這個數字1，是可以改變的，我也可以叫“i”為2，程式碼表示就是i=2。
介紹一個迴圈的語句：While。
標準格式為：
While 條件
Wend
舉例說明，當小明跑50米，沒有跑到終點不停下來。那麼就應該這樣寫：
while 小明開始跑，跑到50米終點 小明又跑了10米
Wend ’小明是否跑到了終點，如果沒有跑到終點，返回繼續跑。
'小明跑到了終點
接著瞭解一個神祕的事物《Cells(i, 1).Value》，這個在VBA當中，就被稱為單元格的值，簡單英文翻譯即可知道。
Cells有一個使用方法，Cells(開關1，開關2)，其中開關1代表表格中的行，開關2代表表格中的列，第一行第一列所在單元格，就是A1，翻譯成VBA程式碼，就變成Cells(1,1)。要獲得單元格A1的值或者叫內容，就是Cells(1,1).value。結合前面的while迴圈和事物名稱，就可以合體稱這樣：
VBA裡面還有個厲害的事物，可以把日期按照特定格式顯示出來：Format。比如：If Format(Now(), "YYYY-MM-DD") > Format(Cells(i, 2), "YYYY-MM-DD") Then。
這句話翻譯過來就是：
如果格式(現在(),“YYYY-MM-DD”)>格式(單元格(i,2),“YYYY-MM-DD”)。
這裡是機器翻譯，說人話就是，如果當前系統時間 大於 第i行，第2列的單元格的日期的時候，則...。就是這個意思啦。
我們將過期的旁邊，用提示框並標註為“是”，以作為提醒資訊。然後認識一個Msgbox，這也是個厲害的角色，只要在VBA環境中，輸入這個關鍵字“MsgBox”，並空格後輸入內容，系統就能神奇的出現一個提示框，彈出一個資訊出來。
【修改單元格的內容】這依舊需要使用到之前的Cell角色，只要告訴cell在第幾行，第幾列，然後內容是什麼，就能在vba的環境下，修改單元格的內容，用vba程式碼表示：Cells(i, 3) = "是"。
觀察下完整的VBA程式碼圖，以及執行狀態圖：
為了方便執行，在介面上插入一個“形狀”，將剛才設定的VBA程式碼，關聯到excel工作表格中去。
插入之後，在形狀上點選右鍵，在彈出選單中，點選“指定巨集”，然後選中自己寫好的模組裡面的名稱，並確定，即可指定完成。。
完成。
注意事項
希望對你有所幫助