excel如何设置日期到期提醒？

下面就来分享一下Excel表格中如何设置日期到期提醒。

1、首先在打开的表格中，框选需要设置日期到期提醒的单元格。

2、这时在上面点选“开始——条件明斗格旦银式”。

3、条件格式中，点选“突出显示单元格规则——发生日模槐宴期”。

4、d出页，点选时间选项“昨天”，选择“下月”。

5、设置好提醒时间后，点击“确定”。

6、返回日期界面，即可看到下月到期日期已高亮显示。

1、首先打开需要编辑的Excel表格，进入到编辑页面中，鼠标右键单击左下角工作表，选择打开查看代码。

2、然后在d出来的窗口中，点击选择左侧Excel 对象中的“ThisWorkbook”选项。

3、然后在d出来的窗口中，点击打开“通用”，选择“workbook”。

4、然后打开后面的选项栏，选择“open”选项。

5、然后点击下方的编辑框，输入下方的代码：

Private Sub Workbook_Open()

 Dim v, s, n As Date

  v = Application.WorksheetFunction.Max(Range("C2:C15"))  'C2:C15为要审查的单元格

   For Each s In Range("搭陵C2:C15")

      n = Date   '获取当前日期

      If s >n And s <n + 60 Then    ' 设置到期60天时提醒

          If v >s Then

              v = s

          End If

      End If

   Next       

 If v <Application.WorksheetFunction.Max(Range("C2:C15")) Then

     茄哪 Dim T As String

      Dim R As Integer

      Set C = Range("C2:C15").Find(v)

      If Not C Is Nothing Then

          R = C.Row  '返回行

      End If

      T = Sheet1.Cells(R, 2).Value

      MsgBox T &"将于" &v &"到期，请及时核定！"

  End If

End Sub

6、然后单击左上角知纳戚的保存按钮。

7、然后重新打开Excel表格，到了时间就会d出窗口提示了。

---