选中a1,然后点击数据有效性,选择自定义,在公式栏输入=B1<>"",然后将“忽略空值”的选项取消。最后在出错警告中的错误信息栏输入“请在b1输入值后,再输入a1”。
这样就可以了。。希望对你有帮助。
用数据有效性可以实现
选择A列,数据,有效性,来源里面输入=len(b1)>0
这个用数据有效性可以解决
方法:
选中A1,数据有效性,允许中选择自定义,在公式中输入=B1<>"",将“忽略空值”的勾取消。在出错警告中的错误信息栏输入“请先在B1输入任何值”。
确定即可.
也可以用VBA解决
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Cells(1, 2) = "" Then
MsgBox "请先在B1输入数据!"
Cells(1, 2).Select
End If
End If
End Sub