excel如何设置单元格输入内容后自动显示输入内容并要求确定一遍
展开全部
请输入完毕后按回车键,代码生效
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
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
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询