Excel单元格怎么禁止输入一些敏感日期？
发布网友
发布时间：2022-04-21 03:07
共5个回答
热心网友
时间：2022-06-17 15:56
使用有效性来控制。
按图示来，选中你要填入日期的列，我这里以C列演示，然后顶端菜单栏 数据，有效性，设置，允许自定义，下面输入公式：
=ISNA(MATCH(C1,A:A,))公式中A:A为敏感日期所在列。然后在出错警告中输入提示语句。
结果演示：
注：由于excel中日期为连续整数，所以此敏感日期输入带年份，我们在excel中输入日月默认为当年，所以仅限当年使用，隔年需要重新设置敏感日期。
热心网友
时间：2022-06-17 15:57
假设A列的“*月*日”均为文本
在C2中输入或复制粘贴下列公式
=EDATE(A2,RANDBETWEEN(-10,10)*12)
下拉填充
在D2中输入或复制粘贴下列公式
=IF(COUNTIF(A:A,TEXT(C2,"M月D日"))>0,"敏感日期","")
下拉填充
也可用条件格式来做
热心网友
时间：2022-06-17 15:57
方法2用vba，可以自定义提示，并在提示后自动删除原输入数据，以便重新输入，不同年份也同样使用，代码如下
'按ALT+F11-粘贴代码-将表格另存为启用宏的格式
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row <> 1 Then
If Cells(Target.Row - 1, 4) <> "" Then
For Each cel In Range("a2:a10")
If cel <> "" Then
If Mid(Cells(Target.Row - 1, 4), 5) = Mid(cel, 5) Then n = n + 1
End If
Next
End If
End If
If n > 0 Then
MsgBox "不能输入" & Cells(Target.Row - 1, 4)
Cells(Target.Row - 1, 4).Clear
Cells(Target.Row - 1, 4).Select
End If
End Sub
热心网友
时间：2022-06-17 15:58
首先你得吧所谓的敏感日期输入在旁边的一个列中，输入日期后的这个辅助列可以隐藏处理不显示哦！
1、采用条件格式设置，条件为等于预先输入的日期，只要输入了，就可以显示你预先设置特殊的字体、背景颜色
2、采用数据有效性，设置输入的日期不得等于预先输入日期，就可以拒绝敏感日期输入了
热心网友
时间：2022-06-17 15:58
这就是数据验证性，*录入指定内容，
第一步:选定录入位置，如图中C4:C10
第二步:数据验证:自定义，输入公式，
=countif(A2:A10,C4)=0
出错警告，输入:特殊时期，不得宣传，
效果如图
如有需要可以继续交流！
