各位前辈能帮我看看，这个怎么解决吗？

HUexcle

我这个公式要实现，资产名称，物品名称，当我是相同资产名称不同名称时，编号从001开始递增，当我是资产名称的相同物品名称那编号就一致相同，当我是不同资产名称时那我的编号是独立的从001开始重新开始，也就是每个资产名称的编号都是从001开始，但是资产名称中物品名称相同的要编号一致资产名称 物品名称，但是目前到了002的编号就出现了跳跃式编号了，这个只是一个样表，我的表有几百条数据

良良

=TEXT(SUMPRODUCT((B$2:B2=B2)/COUNTIFS(B$2:B2,B$2:B2,C$2:C2,C$2:C2)),"000")

hxj119

1. =TEXT(MATCH(C2,UNIQUE($C$2:$C$16),0),"000")

复制代码

浮生若梦~~~

hxj119 发表于 2024-9-13 12:45

要这样         

HUexcle

浮生若梦~~~ 发表于 2024-9-13 12:57
要这样

挖c,前辈真是强大的脑洞，膜拜，就是要这个

HUexcle

hxj119 发表于 2024-9-13 12:45

前辈你这个如果资产名称只有一个是可以用的，但是多个的话，没有办法实现我要的结果

HUexcle

良良 发表于 2024-9-13 12:34
=TEXT(SUMPRODUCT((B$2:B2=B2)/COUNTIFS(B$2:B2,B$2:B2,C$2:C2,C$2:C2)),"000")

前辈你这个我用wps他报错

HUexcle

良良 发表于 2024-9-13 12:34
=TEXT(SUMPRODUCT((B$2:B2=B2)/COUNTIFS(B$2:B2,B$2:B2,C$2:C2,C$2:C2)),"000")

不过发现他确实能用，强大，和三楼的效果是一样的

zhangcheng6688

学习一下字典，打扰了
Sub test()
arr = [b1].CurrentRegion
Set d = CreateObject("scripting.dictionary")
For i = 2 To UBound(arr)
   If Not d.exists(arr(i, 1)) Then
      Set d(arr(i, 1)) = CreateObject("scripting.dictionary")
   End If
   If Not d(arr(i, 1)).exists(arr(i, 2)) Then
      d(arr(i, 1))(arr(i, 2)) = d(arr(i, 1)).Count + 1
      arr(i, 3) = d(arr(i, 1))(arr(i, 2))
   Else
      arr(i, 3) = d(arr(i, 1))(arr(i, 2))
   End If
Next
Columns(4).NumberFormat = "000"
[b1].CurrentRegion = arr
End Sub

你是那块小饼干

1. =SCAN(0,C1:C16<>C2:C17,LAMBDA(X,Y,TEXT(SUM(X,Y),"000")))

复制代码