| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]如何判断粘贴过来的空单元格数据，并设置错误提示 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90399) |
| -- 作者：fuucc -- 发布时间：2016/9/12 8:35:00 -- [求助]如何判断粘贴过来的空单元格数据，并设置错误提示 判断粘贴过来的空单元格数据，并设置错误提示，对有数据的单元格的可以判断后seterror，请问没有数据的如何判断。 我是在datacolchanging设置的如下代码 Select Case e.DataCol.Name Case "xingming" If e.NewValue IsNot Nothing Then
e.DataRow.SetError("xingming","")
Else
e.DataRow.SetError("xingming","姓名为空!")
End If Case "xingbie"
If e.NewValue IsNot Nothing Then
If(e.NewValue="男") Or (e.NewValue="女") Then
e.DataRow.SetError("xingbie","")
Else
e.DataRow.SetError("xingbie","性别输入错误!")
e.Cancel=True
End If
Else
e.DataRow.SetError("xingbie","性别为空!")
End If End Select 不管是高速合并还是直接粘贴 性别为空就判断不了错误 望大神帮指正错误
|
| -- 作者：有点蓝 -- 发布时间：2016/9/12 9:33:00 -- Select Case e.DataCol.Name Case "xingming" If e.NewValue > "" Then e.DataRow.SetError("xingming","") Else e.DataRow.SetError("xingming","姓名为空!") End If Case "xingbie" If e.NewValue > "" Then If(e.NewValue="男") Or (e.NewValue="女") Then e.DataRow.SetError("xingbie","") Else e.DataRow.SetError("xingbie","性别输入错误!") e.Cancel=True End If End Select
|
| -- 作者：fuucc -- 发布时间：2016/9/12 11:54:00 -- [求助]回复：（有点蓝）Select Case e.DataCol.Name &... 主要是原来就是空值，现在粘贴也是空值，没有触发datacolchanging事件。有没有粘贴后的事件判断呢，呵呵 |
| -- 作者：有点蓝 -- 发布时间：2016/9/12 12:16:00 -- 试试 |