请输入完毕后按回车键,代码生效
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Value = "" And Selection.Offset(-1, 0) = "" Then Exit Sub
MsgBox "您刚输入的值为:" & Selection.Offset(-1, 0).Value & "请确认输入是否正确", vbInformation, "提示"
End Sub
这个要用vba才行