標題: [發問] 查找成品回貨數量 [打印本頁]

---

作者: shootingstar    時間: 2023-8-25 09:16     標題: 查找成品回貨數量

如圖所示，希望當用料清單等於原料採購時可以在產成品回貨數帶出本期完工數量
由於用料清單不一定是1:1，有可能是1:2或2:1都不一定，但其回貨數量肯定是產品的本期完工數
是否有公式可以引用，謝謝！

[attach]36777[/attach]

---

作者: Andy2483    時間: 2023-9-23 09:58

回復 1# shootingstar


    謝謝前輩發表此主題與範例
後學藉此帖練習VBA,學習方案如下,請前輩參考
[attach]36844[/attach]

執行前:
[attach]36845[/attach]

執行結果:
[attach]36846[/attach]


Option Explicit
Sub TEST()
Dim Brr, Crr, i&, T$, T3$, T5$, T6$, TT$, S&
If [G65536].End(3).Row <> 1 Then Range([G2], [G65536].End(3)).ClearContents: Exit Sub
Brr = Range([G2], [A65536].End(3))
ReDim Crr(1 To UBound(Brr), 1 To 1)
For i = 1 To UBound(Brr)
   T = Trim(Brr(i, 1)): T3 = Trim(Brr(i, 3)): T5 = Trim(Brr(i, 5)): T6 = Trim(Brr(i, 6))
   If TT <> T Then TT = T: S = Val(T5)
   If T3 = T6 And T3 <> "" Then Crr(i, 1) = S
Next
[G2].Resize(UBound(Crr), 1) = Crr
Erase Brr, Crr
End Sub

---

作者: hcm19522    時間: 2023-9-25 13:11

H3=IF((C4=F4)*(C4<>""),LOOKUP(9^9,E$2:E3),"")

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)