以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]分组别禁止号码重复的代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=194625)

--  作者:外贸小白
--  发布时间:2024/12/30 9:22:00
--  [求助]分组别禁止号码重复的代码
AB两列,A列分组,B列分款
A列下组别号相同的时候,B列禁止款号重复
A列下不同组别号的时候,B列允许款号重复
请帮忙看下代码怎么写?

正常情况下是禁止款号重复的,但是遇到特殊条件的时候,会有重复款号出现
比如去年FALL 2024做过一个款2Q001279,但是今年FALL 2025,又做了2R001279款,虽然是相同的款号,但是确实不同的年份做的

--  作者:外贸小白
--  发布时间:2024/12/30 9:24:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:5d9468c4b285649cfbd1d5122c5cfb3.png
图片点击可在新窗口打开查看
补充图片

--  作者:有点蓝
--  发布时间:2024/12/30 10:04:00
--  
http://www.foxtable.com/webhelp/topics/2481.htm

If e.DataCol.Name = "B列" Then
    Dim
 dr As DataRow
    dr = e.
DataTable.Find("
B列 = \'" & e.NewValue & "\' and A列=\'" & e.DataRow("A列") & "\'")
    If dr IsNot Nothing Then
        MessageBox.Show(
"此
B列号已经存在!")
        e.Cancel = 
True
    End
 If
End
 
If

--  作者:外贸小白
--  发布时间:2024/12/30 11:06:00
--  
你这个禁止B列重复
我想要的是A列和B列两列完全相同,则禁止B列重复
如果A列不同的时候,允许B列相同
例如A列 是HOLIDAY 2025,B列是2R001370,新增行不允许继续出现HOLIDAY 2025;2R001370款
但是允许出现FALL 2025;2R001370款

--  作者:有点蓝
--  发布时间:2024/12/30 11:33:00
--  
3楼就是2列同时判断的