編按：

哈嘍，大家好！提醒面試者面試，是每位HR都會做的事情。但如果記錄面試者信息的表格不夠靈活、智能，那么每天光找出要通知面試的面試者，都是一個另人頭痛的問題。今天，我們就來做一張能自動提醒面試的excel表格，一起來看看吧！

人力資源部的同事希望能做張表格提醒部門的人員安排面試。對于每個應聘者，他們都會預先安排好三次面試的具體時間。如果沒有正確的方法，想要準確的通知面試者并不容易。尤其是這類擁有5000名員工的國有企業(yè)，每到大學生畢業(yè)季，招聘規(guī)模還是不小的。

下表是一張“應聘者明細表”，看表中標注顏色的單元格區(qū)域，你能找出哪位應聘者即將在2019年10月31日的隔天，參加什么階段的面試嗎？顯然是很困難的。

其實，表格是流程的體現，流程又因表格而完善，它們相互作用，將工作推向更高品質。如果我們從實際工作流程和需求出發(fā)，全面分析這張表格，就能得出一個核心結論——智能提醒。既然要求表格具有提醒功能，自然就會聯想到兩點：第一，方便查詢；第二，智能標注。于是，實現方法也就清晰了，無外乎就是運用VLOOKUP和條件格式。

VLOOKUP進行精確匹配有一個條件，第一參數“查找啥”，必須唯一，所以，要在 “應聘者明細表”中加入唯一的應聘者編號用來識別每一位應聘者。

這張表格的字段很簡單，由應聘者的基本資料和面試日期組成。我重點介紹VLOOKUP和條件格式的設置思路及方法。

使用VLOOKUP時，需要一份源數據和一個查詢界面，它們通常被分為兩個工作表。其中，源數據表有以下條件：一維表的結構，一個標題行，字段清晰，數據屬性完整，數據連續(xù)，無合并單元格，無合計行，無分隔行，數據中無空白單元格。當整理出合格的源數據表后，下一步的方便查詢和智能標注就不難學了。

我把記錄了應聘者基本資料和面試日期的“應聘者明細表”作為源數據，再新建一個工作表，命名為“查詢表”。然后在新的工作表中設置VLOOKUP函數，用于查詢。在“查詢表”的B2單元格中輸入公式，并向右向下拖拽鼠標復制。

公式：=VLOOKUP($A2,應聘者明細表!$A$1:$L$21,COLUMN(B2),0)

完善公式：=IF(LEN($A2)=0,"",VLOOKUP($A2,應聘者明細表!$A$1:$L$21,COLUMN(B2),0))。（這一步的目的是為了使公式不再顯示#N/A錯誤。）

公式設置完成后，在A列錄入多個應聘編號，就能瞬間得到所有面試者的相關信息。

方便查詢的問題解決了，接下來要解決智能標注的問題。

在設置條件格式之前，要先考慮需求。人力資源部的同事只需要提前一天通知應聘者，這就代表我們應該標注面試日期前一天的數據，即面試日期減去當天日期等于1的單元格。當天日期在Excel里用TODAY函數表示，=TODAY()返回的就是當天的計算機日期。理清了數學關系，又學會了表達式，下面開始設置。

選中“查詢表”中的J2單元格，按ALT+O+D組合鍵調出“條件格式”；點擊“新建規(guī)則”-選擇條件為“使用公式確定要設置格式的單元格”，輸入公式“=(J2-TODAY())=1”；設置滿足條件的單元格底紋為紫色，點擊“確定”。然后，用格式刷將J2單元格的條件格式復制到其他單元格，這樣，一份有提醒功能的面試通知表就完成了。

擁有這份表格后，人力資源部的同事只需要做好一件事，就能快速、準確的知道今天應該通知哪些應聘者參加什么階段的面試。這件事很簡單：打開表格，找到填充色為紫色的單元格。

說到這里，可能有的小伙伴會有疑問了，“如果我想知道任意一天的面試信息，該怎么做呢？比如我想知道11月26日這天有哪些人參加面試”？其實對于這類指定日期的面試，我們可以使用VBA程序來完成，它可以使Excel更自動化，實現函數所無法達到的功能。我們使用Worksheet_SelectionChange編寫過程，當選中某天所在的單元格后，它會自動把該天的所有單元格填充相同的底紋顏色。

在“面試提醒表”所在的工作表模塊中輸入程序：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Range("J2:L21").Interior.ColorIndex = xlNone  '清除單元格里原有底紋顏色

    '當選中的單元格個數大于1時，重新給Target賦值

    If Target.Count > 1 Then

           Set Target = Target.Cells(1)

    End If

    '當選中的單元格不包含指定區(qū)域的單元格時，退出程序

    If Application.Intersect(Target, Range("J2:L21")) Is Nothing Then

         Exit Sub

    End If

    Dim rng As Range   '定義一個Range型變量

    '遍歷單元格

    For Each rng In Range("J2:L21")

        If rng.Value = Target.Value Then

           rng.Interior.ColorIndex = 39

        End If

    Next

End Sub

輸入完成后，返回工作表區(qū)域，想知道哪天面試哪些人員，就用鼠標選中那一天所在的任意一個單元格，面試哪些人就一目了然了！

今天的內容就到這里了，小伙伴們都學會了嗎？

本文配套的練習課件請加入QQ群：747953401下載。

做Excel高手，快速提升工作效率，部落窩教育《一周Excel直通車》視頻和《Excel極速貫通班》直播課全心為你！

掃下方二維碼關注公眾號，可隨時隨地學習Excel：

相關推薦：

條件格式的應用《2個實例讓你學會帶函數公式的條件格式》

VLOOKUP的基礎應用《Vlookup快速核對人員的薪資變動》

表格的制作（基礎）《函數技巧千千萬，如何制表才關鍵！（上篇）》