Excel招聘候选人管理表设计及自动化邮件实现需求问询

刚好做过类似的企业招聘管理Excel模板，给你梳理下具体实现步骤，分工作表设计和邮件自动化两部分来：

一、候选人信息记录工作表设计 #

先把核心的信息列梳理清楚，同时做一些格式优化提升易用性：

• 基础信息列：
  • 姓名（文本格式）
  • 手机号（文本格式，避免前导零丢失，比如010开头的手机号）
  • 邮箱（文本格式，可加数据验证规则=ISERROR(FIND("@",C2))=FALSE确保格式正确）
  • 应聘岗位（下拉菜单，数据验证→序列，输入岗位名称）
• 流程跟踪列：
  • CV提交日期（日期格式，设置为yyyy/mm/dd统一显示）
  • 沟通日期（日期格式，同样统一显示格式）
  • 沟通内容（多行文本，可设置单元格格式为自动换行）
  • 跟进状态（下拉菜单：待沟通、已沟通、面试安排、录用、淘汰）

实用格式优化 #

• 条件格式提醒：给超过3天未跟进的候选人行标黄，选中数据区域→条件格式→新建规则→使用公式确定要设置格式的单元格，输入公式：

  =TODAY()-E2>3
  

  （这里假设E列是沟通日期，根据你的实际列调整），然后设置填充色为浅黄色。
• 冻结窗格：选中表头下第一行→视图→冻结窗格，滚动时表头始终可见。

二、Excel邮件自动化实现（VBA脚本） #

Excel自带的VBA可以轻松实现批量发送面试邀请、跟进提醒邮件，不用手动复制粘贴邮箱和内容。

步骤1：启用开发工具 #

如果你的Excel没显示开发工具，点击文件→选项→自定义功能区，勾选“开发工具”，确定后就能在顶部看到。

步骤2：插入VBA模块 #

点击开发工具→Visual Basic→插入→模块，粘贴下面的脚本（根据你的列位置调整参数）：

Sub 发送招聘跟进邮件()
    Dim olApp As Object
    Dim olMail As Object
    Dim ws As Worksheet
    Dim lastRow As Long
    Dim i As Long
    
    ' 设置工作表（改成你的工作表名称）
    Set ws = ThisWorkbook.Worksheets("候选人信息")
    lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    
    ' 创建Outlook对象
    Set olApp = CreateObject("Outlook.Application")
    
    ' 遍历候选人数据（从第2行开始，第1行是表头）
    For i = 2 To lastRow
        ' 只给状态为"待沟通"的候选人发邮件，可根据需求修改条件
        If ws.Cells(i, "H").Value = "待沟通" Then
            Set olMail = olApp.CreateItem(0)
            With olMail
                .To = ws.Cells(i, "C").Value ' 邮箱列，这里是C列
                .Subject = "【" & ws.Cells(i, "D").Value & "】岗位应聘跟进提醒" ' 应聘岗位是D列
                .Body = "尊敬的" & ws.Cells(i, "A").Value & "：" & vbCrLf & vbCrLf & _
                        "您好！我们已收到您的简历，近期会安排沟通，请注意保持电话畅通。" & vbCrLf & _
                        "如有疑问可回复此邮件，感谢您的关注！"
                ' 如果需要添加附件（比如候选人CV），取消下面注释并修改路径
                '.Attachments.Add "C:\CV文件夹\" & ws.Cells(i, "A").Value & ".pdf"
                .Send ' 直接发送，测试时可以改成.Display先预览
            End With
            Set olMail = Nothing
        End If
    Next i
    
    Set olApp = Nothing
    MsgBox "邮件发送完成！"
End Sub

注意事项 #

• 首次运行会提示宏安全，需要启用宏（文件→信息→启用内容）。
• 测试时把.Send改成.Display，先预览邮件内容再发送，避免出错。
• 可以提前在Outlook里创建邮件模板，VBA里调用模板会更灵活，比如：

  Set olMail = olApp.CreateItemFromTemplate("C:\邮件模板\面试邀请.oft")
  

我自己用这个模板管理过500+候选人，不管是信息记录还是批量跟进都省了不少事，你可以根据公司实际需求调整列和脚本内容～

内容的提问来源于stack exchange，提问作者Yaru001