返回列表 上一主題 發帖

[發問] 求救高手,vba計算上一直計算錯誤

回復 24# wsx1130

需求最好一次說清楚, 沒太多時間逐一跟帖~~
XX20211205編出貨板x3-v1.rar (43.32 KB)

有回應時, 要使用左下方"回復"按鈕, 再發表

TOP

回復 28# wsx1130


這還要花些時間的, 實抽不出空, 再等等!!
或看是否有人先幫一下, 基本上了解之前寫的邏輯, 應可以用來改改!!
不過還是頗麻煩就是了!!

TOP

資料來源=裝板單2
亦即必須先更新"裝板單2", 才能後續處理,
比之前的更繁複, 共有四個狀態, 需要設更多的變數,
寫得自己也亂了, 以後若要更改, 也要花許多時間,
畢竟要重新解讀自己寫的邏輯及規則, 通常...過一兩天就忘了寫什麼:
XX20211207編出貨板x4-v1.rar (50.09 KB)

TOP

多做了一個動作, 再看看:
XX20211207編出貨板x4-v2.rar (56.05 KB)

TOP

回復 37# wsx1130

邏輯都差不多, 自己再抓看看:
XX20211220編出貨板x4-v1.rar (63.71 KB)

TOP

回復 41# wsx1130


1) 箱號+月份
箱號 = [S2]
改為:
箱號 = [S2] & Format(日期, "-mm")

2) 修正四小箱整合一外箱錯誤
Cr(2) = Int((Cv - Cr(1) * 外箱數) / 外箱數) * 外箱數
改為:
Cr(2) = Int((Cv - Cr(1)) / 外箱數) * 外箱數

TOP

回復 43# wsx1130

If Val(Arr(i, 2)) = 0 Or Val(Arr(i, 5)) = 0 Then GoTo 101

或
If Val(Arr(i, 2)) = 0 Or Left(Arr(i, 5), 2) = "QC" Then GoTo 101

TOP

本帖最後由 准提部林 於 2022-1-16 08:42 編輯

回復 45# wsx1130


同板號放同一區塊???
最少三行, 同一板號超過三行, 怎放?

最好先模擬想要的結果, 不要老是去人猜!

TOP

        靜思自在 : 生氣,就是拿別人的過錯來懲罰自己。
返回列表 上一主題