出貨單建立

帖子: 53
主題: 8
精華: 0
積分: 90
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 20
註冊時間: 2019-4-30
最後登錄: 2023-4-25

2^#

發表於 2022-10-6 16:36 | 顯示全部帖子

回復 2# samwang
Sub test()
Dim Arr, T, R&
With Sheets("資料輸入")
R = .[b65536].End(3).Row
If R < 5 Then Exit Sub <------這行的意思是?
Arr = .Range("b5:g" & R)
T = .[F2]
End With
With Sheets("出貨資料")
R = .[b65536].End(3).Row + 1
.Range("b" & R).Resize(UBound(Arr), 6) = Arr<------這行的意思是?
.Range("a" & R & ":a" & R + UBound(Arr) - 1) = T<------這行的意思是?
End With
End Sub

假如我把客戶單號由f2移至b2
要將a2與b2這兩欄放到出貨資料ab欄請問要如何修改?

帖子: 53
主題: 8
精華: 0
積分: 90
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 20
註冊時間: 2019-4-30
最後登錄: 2023-4-25

3^#

發表於 2022-10-7 08:10 | 顯示全部帖子

回復 4# samwang
要將資料輸入的a2與b2欄位，帶入出貨資料的分頁

test.rar (25.61 KB)

帖子: 53
主題: 8
精華: 0
積分: 90
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 20
註冊時間: 2019-4-30
最後登錄: 2023-4-25

4^#

發表於 2022-10-7 09:48 | 顯示全部帖子

回復 6# samwang
非常感謝，可以執行
昨天在看的時候以為可以直接a2:b2直接用範圍複製
今天知道要如何處理了，謝謝

帖子: 53
主題: 8
精華: 0
積分: 90
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 20
註冊時間: 2019-4-30
最後登錄: 2023-4-25

5^#

發表於 2022-10-7 19:54 | 顯示全部帖子

回復 6# samwang

請教問題我在出貨資料中221007001有10筆，我在資料輸入再輸入10資料，單號可以判定出貨資料最後一欄位+1嗎?
例如單號可以自動當天日期+流水號，221007001
我的想法是輸入明細後，匯至出貨資料時在單號部分就帶入日期加流水號，隔天流水號就回到1
麻煩在指點，謝謝

test.rar (22.24 KB)

帖子: 53
主題: 8
精華: 0
積分: 90
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 20
註冊時間: 2019-4-30
最後登錄: 2023-4-25

6^#

發表於 2022-10-7 19:55 | 顯示全部帖子

回復 8# Andy2483
很詳細，還附中文，我測試使用，感謝指點:)

帖子: 53
主題: 8
精華: 0
積分: 90
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 20
註冊時間: 2019-4-30
最後登錄: 2023-4-25

7^#

發表於 2022-10-8 08:29 | 顯示全部帖子

回復 11# Andy2483
感謝耐心看完
5.資料輸入會一直累積資料？
7.還是累積資料給其他人員看而已
因親人想在出貨這塊建立資料，以利後續查詢當時報價與相關資訊
所以會建立出貨明細，以利後續相關其他員工觀看
所以，會想要建立流水號串查當天出貨資訊

帖子: 53
主題: 8
精華: 0
積分: 90
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 20
註冊時間: 2019-4-30
最後登錄: 2023-4-25

8^#

發表於 2022-10-11 13:33 | 顯示全部帖子

回復 14# Andy2483

感謝幫忙，讓我吸收一下，有些要思考一下你寫的邏輯
謝謝，看不懂地方在發問

帖子: 53
主題: 8
精華: 0
積分: 90
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 20
註冊時間: 2019-4-30
最後登錄: 2023-4-25

9^#

發表於 2022-10-11 18:45 | 顯示全部帖子

回復 16# Andy2483
我這邊的流程想法，是想要資料輸入完成後，複製到出貨資料，這時候就存檔或列印出貨單

請問我想要直接出貨資料就當資料庫呢?
再輸入客戶時，按鈕產生下一筆流水號(或者說資料輸入完成後，複製到出貨資料時，經由程式給予流水號建立至出貨資料內)
嘗試著修改程式，但好像會卡在流水號判定這邊

帖子: 53
主題: 8
精華: 0
積分: 90
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 20
註冊時間: 2019-4-30
最後登錄: 2023-4-25

10^#

發表於 2022-10-12 09:38 | 顯示全部帖子

回復 19# Andy2483
抱歉打擾到你這邊，讓你花時間寫程式
還是非常感謝