怎么在EXCEL表格表做报警格式

1.如何设置EXCEL2010声音报警?

预警功能通过高亮单元格来实现，单元格自动变色的问题在EXCEL中可用两种方法实现：方法一： 条件格式，操作如下（以到期前五天举例）： 开始-->条件格式-->新建规则-->使用公式确定-->输入公式=（A1>TODAY()-5)*(A1设置单元格填充色-->确定。

公式中的星号可用and函数替代。方法二： VBA代码。

alt+f11打开VBA， 键入如下代码到需要设置颜色的sheet下，Private Sub Worksheet_SelectionChange(ByVal Target As Range)Dim cel As Range For Each cel In Range("a1:a" & Range("a65536").End(xlUp).Row) If cel > Date - 5 And cel < Date Then cel.Interior.ColorIndex = 20 NextEnd Sub分享本回答由电脑网络分类达人 陈淑霞认证其他类似问题2008-09-12请问：怎样设置才能使工作表中的某储存格具有报警功能？22010-03-03excel 预警怎么设置162008-01-20excel报警功能42008-01-25如何在Excel中实现数量设限定报警功能12012-03-21excel预警数值怎么设置？更多关于如何设置EXCEL2010声音报警？的问题>>为您推荐：举报| 2009-02-24 12:10#行家高质畅答赛火热开赛 ！超级豪礼等你来~#提问者采纳至少可以在每次打开这个EXCEL文件的时候，自动判断是否到期，并且可以设置在到期前多少天给出提示。常见方法有二：1、单元格内文字提示（公式法）：例如你的报告有效期在A1单元格，请在A2（举例）单元格输入公式“=IF(A1-TODAY()<50，"距离有效期还有"&TEXT(A1-TODAY（)，"@"）&"天"，""）”，则当距离有效期少于50天的时候，A2单元格会显示“距离有效期还有XX天”，否则不显示任何内容。

注意：A、EXCEL是把系统日期作为当前日期的，如果你电脑的系统日期不正确，则EXCEL无法正确判断。B、上面的公式请直接复制，但不含外侧引号。

C、公式中的数字50可修改，例如该成20，则小于20天时提示。D、你的报告的有效期应为EXCEL可识别的标准日期格式，例如2008-2-24。

2、对话框弹出提示（宏方法）：如果你对宏不太了解，则我们结合公式，以最简单的方式实现。要运行宏，需要在EXCEL的“工具”—“宏”—“安全性”中进行设置。

还是例如你的报告有效期在sheet1的A1单元格，请在A2（举例）单元格输入公式“=IF(A1-TODAY()<50,TRUE,FALSE）”。在A3单元格输入公式“=A1-TODAY（)”并将该单元格的数字格式设为“常规”。

然后按下Atl+F11打开VBA编辑器，在左侧上方的窗口中双击ThisWorkbook，然后在右侧的主窗口中，顶部左边下拉选择Workbook，右侧选择Open，编辑器会自动生成如下内容：Private Sub Workbook_Open()End Sub请在这两句中间添加如下内容：If Worksheets("sheet1").Range("A2") = True ThenMsgBox "距离有效期还有" & Worksheets("sheet1").Range("A3").Value & "天。"， 0， "提示"， 0, 0ElseEnd If完成后保存即可。

这样，当距离有效期到达规定值时，一打开这个工作薄，EXCEL就会弹出一个对话框，提示“距离有效期还有XX天。”。

2.excel报警功能

预警功能通过高亮单元格来实现，单元格自动变色的问题在EXCEL中可用两种方法实现：

方法一：

条件格式，操作如下（以到期前五天举例）：

开始-->；条件格式-->；新建规则-->；使用公式确定-->；输入公式=（A1>TODAY()-5)*(A1<TODAY())-->；设置单元格填充色-->；确定。

公式中的星号可用and函数替代。

方法二：

VBA代码。

alt+f11打开VBA， 键入如下代码到需要设置颜色的sheet下，

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim cel As Range

For Each cel In Range("a1:a" & Range("a65536").End(xlUp).Row)

If cel > Date - 5 And cel < Date Then cel.Interior.ColorIndex = 20

Next

End Sub

3.怎么在excel中设置时间提示报警

操作步骤：如下图，在A2单元格输入=TODAY（)，该函数自动返回当前的日期。

每次打开工作簿时都会自动更新。双击C2单元格，输入函数：=IF(B2-A2<=10，"提醒"，"")这时，如果B2的日期减去A2的日期（也就是今天的日期）小于等于10时，C2单元格会返回“提醒”二字，否则返回空白。

我们尝试更改A2单元格的日期会发现公式返回结果的变化。注意：excel里两日期相减得到的天数相当于“算头不算尾”的方法，比如说明天的日期减去今天的日期返回结果是1。

如果不想加C列显示，只想在B列快到期时自动添加颜色显示也可以用条件格式完成。首先，选中B2单元格，选择【开始】-【条件格式】-【新建规则】。

在【新建规则】界面如下图选择【使用公式确定要设置格式的单元格】。在下面的输入框内输入公式=B2-TODAY()<=10，然后点击【格式】按钮。

在【格式】选项卡选择一个合适的填充色后返回前一界面点击确定。这样，当B2的日期减去电脑系统时间小于等于10天的时候，单元格就会被填充上刚才选中的颜色。