依訂單資料轉換成六週排程表，敬請各位大大賜教!!! - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 依訂單資料轉換成六週排程表，敬請各位大大賜教!!!

返回列表下一主題上一主題發帖

依訂單資料轉換成六週排程表，敬請各位大大賜教!!!

中學生 Rank: 2

帖子: 134
主題: 27
精華: 0
積分: 168
點名: 0
作業系統: WINXP
軟體版本: EXCEL 2003
閱讀權限: 20
性別: 男
來自: 雲林
註冊時間: 2010-10-6
最後登錄: 2018-5-13

論壇贊助勳章

1^# 跳轉到 »

發表於 2012-4-24 23:36 | 顯示全部帖子

依來源資料比對符合日期套取在對應的欄位上???

如附件每日會有資料填於Sheet上，可否使用VBA將資料套取於Sheet2上的表格格式，懇請各位高手教導，在此先謝謝:)

主要依"交期"欄位會有分多筆，於需求日需加總同訂單數，而交期欄位各別比對其對應的符合日期欄位

Book1.rar (2.03 KB)

中學生 Rank: 2

帖子: 134
主題: 27
精華: 0
積分: 168
點名: 0
作業系統: WINXP
軟體版本: EXCEL 2003
閱讀權限: 20
性別: 男
來自: 雲林
註冊時間: 2010-10-6
最後登錄: 2018-5-13

論壇贊助勳章

2^#

發表於 2012-4-25 09:17 | 顯示全部帖子

感謝c_c_lai 兄的補充說明，的確此就是小弟所想要的功能

但再額外補充說明一下,就如符件中的Sheet1上的訂單資料，其實有三筆是重覆的（因交期因素把它拆開來），但套到Sheet2時要匯整成一項（需求數加總，並依交期數分別套在對應的日期上）

中學生 Rank: 2

帖子: 134
主題: 27
精華: 0
積分: 168
點名: 0
作業系統: WINXP
軟體版本: EXCEL 2003
閱讀權限: 20
性別: 男
來自: 雲林
註冊時間: 2010-10-6
最後登錄: 2018-5-13

論壇贊助勳章

3^#

發表於 2012-4-25 21:49 | 顯示全部帖子

感謝register313兄指教，但小弟將程式碼複製執行巨集時，卻跑出"執行階段錯誤 '424': 此處需要物件"的警告視窗，停在.[A1].CurrentRegion.Offset(1, 0) = ""此列，不知何故???

中學生 Rank: 2

帖子: 134
主題: 27
精華: 0
積分: 168
點名: 0
作業系統: WINXP
軟體版本: EXCEL 2003
閱讀權限: 20
性別: 男
來自: 雲林
註冊時間: 2010-10-6
最後登錄: 2018-5-13

論壇贊助勳章

4^#

發表於 2012-4-25 22:27 | 顯示全部帖子

感謝register313兄，可以執行了，但小弟不明白，程式碼一樣，因何小弟自己複製貼上的就不行呢???還有小弟接觸vba不久，不知是否可請register313兄針對程式碼小小說明一下，謝謝...

中學生 Rank: 2

帖子: 134
主題: 27
精華: 0
積分: 168
點名: 0
作業系統: WINXP
軟體版本: EXCEL 2003
閱讀權限: 20
性別: 男
來自: 雲林
註冊時間: 2010-10-6
最後登錄: 2018-5-13

論壇贊助勳章

5^#

發表於 2012-4-27 23:18 | 顯示全部帖子

小弟先摸索看看了.再次感謝register313兄^^

中學生 Rank: 2

帖子: 134
主題: 27
精華: 0
積分: 168
點名: 0
作業系統: WINXP
軟體版本: EXCEL 2003
閱讀權限: 20
性別: 男
來自: 雲林
註冊時間: 2010-10-6
最後登錄: 2018-5-13

論壇贊助勳章

6^#

發表於 2012-4-29 12:43 | 顯示全部帖子

感謝Hsieh 版主，小弟將代碼複製要執行時，又在"n = .Cells(1, .Columns.Count).End(xlToLeft).Column - 1”此列跑出"執行階段錯誤 '424': 此處需要物件"的警告視窗，是除了複製外還有需要再做什麼的設定嗎???

中學生 Rank: 2

帖子: 134
主題: 27
精華: 0
積分: 168
點名: 0
作業系統: WINXP
軟體版本: EXCEL 2003
閱讀權限: 20
性別: 男
來自: 雲林
註冊時間: 2010-10-6
最後登錄: 2018-5-13

論壇贊助勳章

7^#

發表於 2012-5-2 17:26 | 顯示全部帖子

Hsieh 版主因小弟實際排程有時會有跨月的問題，例：需求日5/20，交期回覆到6/10，但按目前巨集執行發現僅比對"日"而已，如按以上日期，其交期對應的會秀到5/10，此是否可再修正???

中學生 Rank: 2

帖子: 134
主題: 27
精華: 0
積分: 168
點名: 0
作業系統: WINXP
軟體版本: EXCEL 2003
閱讀權限: 20
性別: 男
來自: 雲林
註冊時間: 2010-10-6
最後登錄: 2018-5-13

論壇贊助勳章

8^#

發表於 2012-5-2 22:22 | 顯示全部帖子

先感謝Hsieh版主了,明日再測試看看,但上一個問題仍想請問,就是如單複製代碼,因何執行巨集會跑出錯誤呢...
Hsieh版主的巨集,大大降低工作量,真的太感謝你了

中學生 Rank: 2

帖子: 134
主題: 27
精華: 0
積分: 168
點名: 0
作業系統: WINXP
軟體版本: EXCEL 2003
閱讀權限: 20
性別: 男
來自: 雲林
註冊時間: 2010-10-6
最後登錄: 2018-5-13

論壇贊助勳章

9^#

發表於 2012-5-3 08:43 | 顯示全部帖子

感謝Hsieh兄的回覆,小弟按最新程式碼執行後,卻跑出"執行階段錯誤'9'，陣列索引超出範圍"，並停在ar(0, x) = ar(0, x) + A.Offset(, 3)此程式碼，因我現執行的筆數有快200筆，是有設限筆數嗎???

還有原提供報表中僅有"訂單＂，"料號"，"項次"三資料，但如果要再增加幾筆資料，原程式碼是否即需再修改???

中學生 Rank: 2

帖子: 134
主題: 27
精華: 0
積分: 168
點名: 0
作業系統: WINXP
軟體版本: EXCEL 2003
閱讀權限: 20
性別: 男
來自: 雲林
註冊時間: 2010-10-6
最後登錄: 2018-5-13

論壇贊助勳章

10^#

發表於 2012-5-3 19:14 | 顯示全部帖子

的確有如Hsieh版主所說的狀況，但即使我將日期最小值已更新至5/1起，但執行時仍發生錯誤，附上檔案，煩請Hsieh版主解惑，謝謝!!!

Book1.rar (15.27 KB)

靜思自在 : 有心就有福，有願就有力，自造福田，自得福緣。

返回列表下一主題上一主題