excel中，怎样设置：如果A列为空则B列不能输入内容，如果A列不为空则B列可以输入预设的内容。

发布网友 发布时间：2022-04-23 06:00

我来回答

共4个回答

热心网友 时间：2023-10-17 21:33

VBA可以实现，在工作表名处鼠标右键“查看代码中”，找到当前需要*输入的工作表名，并在其上鼠标右键“查看代码中”，在右边的空白框中复制并粘贴如下事件的代码即可：
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo err
Application.EnableEvents = False
If Target.Column = 2 Then '如果当前编辑的为B列
'判断对应的A列是否有内容
If Range("A" & Target.Row).Value = "" Then '对应的A列为空

Range("B" & Target.Row).Value = "" '将当前输入内容变为空,并提示如下内容
MsgBox "请先输入A" & Target.Row & "单元格内容。"
Else
'判断B列内容
If Range("B" & Target.Row).Value <> "男" And Range("B" & Target.Row).Value <> "女" Then
MsgBox "B列只能输入别""男""或""女""。"
End If

End If
End If
Application.EnableEvents = True

Exit Sub
err:
Application.EnableEvents = True
MsgBox err.Description
End Sub

热心网友 时间：2023-10-17 21:33

选中B1，数据，有效性，自定义，下面公式框中输入
=(A1<>"")*or(B1="男",B1="女")
确定，试试看。追问谢谢回答，可试验后，无论A1中是否为空，B1中均可输入任何值，没有起到*作用。

热心网友 时间：2023-10-17 21:34

=(A1<>"")*OR(B1="男",B1="女")
应该没问题你看设置有效性的时候上面有个忽略空值的勾不要勾上追问去掉忽略控制后真的好使了。
可我发现，在C1应用这个数据有效性时，把“男”换成特殊符号“√”时，忽略空值去掉也不行，不知为什么？
而且应用自定义数据有效性后，没有了下拉箭头，不能直接选“男”“女”和“√”了。我提问时没考虑到，最好能有下拉箭头，这样便于输入。

追答=(A1"")*OR(B1="男",B1="女",B1="√")
箭头要选择序列才可以的 要不你有效性直接用序列吧 里面输入 男,女,√ 就是不能在A列空的时候*输入 或者帮你写个小代码 可以不？

热心网友 时间：2023-10-17 21:34

无论A1中是否为空，B1中均可输入任何值，没有起到*作用

兄弟，设置有效性的时候，你把忽略人值点掉追问去掉忽略控制后真的好使了。
可我发现，在C1应用这个数据有效性时，把“男”换成特殊符号“√”时，忽略空值去掉也不行，不知为什么？
而且应用自定义数据有效性后，没有了下拉箭头，不能直接选“男”“女”和“√”了。我提问时没考虑到，最好能有下拉箭头，这样便于输入。

追答在设置有效性的时候
允许里选择“序列” 会出现提供下拉选择勾选框