返回列表 上一主題 發帖

如何判斷為同一組

如何判斷為同一組

請問,如何依A,B及D欄為條件,判斷是否為同一組?

活頁簿1.zip (8.66 KB)

希望支持!

回復 1# s7659109

根據附件我看不太懂@@

第2列、第12列、第13列 為什麼都是NO1?

對於"同一組"有明確的定義嗎?
用功到世界末日那一天∼∼∼

TOP

本帖最後由 a5007185 於 2018-7-31 13:53 編輯

回復 1# s7659109

我是用VBA處理的,
請參考以下程式碼。
  1. Sub NumberCode()
  2.     Dim i%, Str$, ArrStr$
  3.     i = 2
  4.     ArrStr = "" '清空已記錄到的條件
  5.     Do Until Range("C" & i) = ""
  6.         '將A欄、B欄、D欄合併為一個字串作為條件
  7.         Str = Range("A" & i) & Range("B" & i) & Range("D" & i)
  8.         '若該條件未記錄過,則記錄之。
  9.         If InStr("," & ArrStr & ",", "," & Str & ",") = 0 Then ArrStr = ArrStr & "," & Str
  10.         '撈出Str在陣列ArrStr中的索引值
  11.         Range("F" & i) = "No. " & UBound(Split(Split(ArrStr, Str)(0), ","))
  12.         i = i + 1
  13.     Loop
  14. End Sub
複製代碼

TOP

本帖最後由 s7659109 於 2018-7-31 15:37 編輯

問題:
條件:當a欄b欄及d欄一致時,才給同一編號,測試error

0731.zip (22.67 KB)

希望支持!

TOP

回復 1# s7659109

填入F2,其餘下拉
  1. =IF(COUNTIFS($A$1:A1,A2,$B$1:B1,B2,$D$1:D1,D2)>0,LOOKUP(1,0/(($A$1:A1=A2)*($B$1:B1=B2)*($D$1:D1=D2)),$F$1:F1),"NO"&SUMPRODUCT(1/COUNTIF($F$1:F1,$F$1:F1)))
複製代碼

TOP

因原始資料有8000筆,希望以vba解決
希望支持!

TOP

函數測試仍error
希望支持!

TOP

回復 7# s7659109
你給錯條件了,你再看清楚一點。。。
表達不清、題意不明確、沒附檔案格式、沒有討論問題的態度~~~~~~以上愛莫能助。

TOP

以no1為例第2列至第12列都是同組,其中d欄cr(借方),dr(貸方),確實以:a欄b欄及d欄為判讀要件
已更正對照內容了

0731.zip (22.67 KB)

希望支持!

TOP

以no1為例第2列至第12列都是同組,其中d欄cr(借方),dr(貸方),確實以:a欄b欄及d欄為判讀要件
希望支持!

TOP

        靜思自在 : 人生沒有所有權,只有生命的使用權。
返回列表 上一主題