返回列表 上一主題 發帖

[發問] 查找成品回貨數量

shootingstar

帖子
63 
主題
34 
精華
0 
積分
103 
點名
0  
作業系統
XP 
軟體版本
office 2007 
閱讀權限
20 
性別
女 
註冊時間
2010-8-5 
最後登錄
2024-10-17 

論壇榮譽勳章論壇贊助勳章
1# 跳轉到 » 正序看帖
打印
tT
發表於 2023-8-25 09:16 | 只看該作者

[發問] 查找成品回貨數量

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

問題.zip (9.81 KB)

收藏 分享

hcm19522

帖子
1387 
主題
4 
精華
0 
積分
1397 
點名
0  
作業系統
WIN 
軟體版本
2007 
閱讀權限
50 
性別
男 
註冊時間
2015-9-11 
最後登錄
2024-11-15 

熱烈參與勳章
3#
發表於 2023-9-25 13:11 | 只看該作者
H3=IF((C4=F4)*(C4<>""),LOOKUP(9^9,E$2:E3),"")
google"EXCEL迷"  blog  或google網址:https://hcm19522.blogspot.com/

TOP

Andy2483
　暱稱: 厚臉皮的學生

大學生Rank: 4

帖子
1446 
主題
40 
精華
0 
積分
1470 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
50 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2024-10-21 
2#
發表於 2023-9-23 09:58 | 只看該作者
回復 1# shootingstar


    謝謝前輩發表此主題與範例
後學藉此帖練習VBA,學習方案如下,請前輩參考
問題_20230923.zip (17.96 KB)

執行前:


執行結果:



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
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

        靜思自在 : 吃苦了苦、苦盡廿來，享福了福、福盡悲來。
返回列表 上一主題