Page 1 of 1

ต้องการคัดลอกข้อมูลแบบมีเงื่อนไข ด้วย VBA

Posted: Fri Jan 21, 2011 11:03 pm
by hellish
เรียนอ.คนควน
มีข้อสอบถามเรื่องคัดลอกข้อมูลแบบมีเงื่อนไข ด้วย VBA
ตัวอย่างปัญหาคือ
มีข้อมูลชีทที่ 1 แถวที่ 1 รหัส 200001 อยู่ location A
แถวที่ 2 รหัส 200001 อยู่ location B
แถวที่ 3 รหัส 200002 อยู่ location B
แถวที่ 4 รหัส 200003 อยู่ location B
ความต้องการคือ คัดลอกข้อมูลที่มี รหัสซ้ำกัน ของแถวที่ 1 และ 2 ไปพร้อมกัน เพื่อไปวางในตารางชีทที่ 2
ที่จัดตารางเป็นชุดๆ ละ 3 แถว ส่วนข้อมูลแถวที่ 3 ต้องไปอยู่ในตารางชุดถัดไปของชีทที่ 2
จะต้องใส่เงื่อนไขแบบใด
ตาม file ที่แนบมาครับ
ขอบคุณมากครับ
ปล.เริ่มคิดไม่ออกแล้วครับ

Re: ต้องการคัดลอกข้อมูลแบบมีเงื่อนไข ด้วย VBA

Posted: Sat Jan 22, 2011 12:03 am
by snasui
:D ไม่เข้าใจหลักการครับ

เท่าที่ดูในชีท Msr จะมี ItemG ไว้ล่วงหน้าอยู่แล้ว เช่น B9, B15, B18 ฯลฯ การที่บอกว่าซ้ำแล้วแยกไปอยู่อีกตาราง หมายความว่าสามารถไปทับค่าที่มีอยู่เดิม (ถ้ามี) หรือเป็นเช่นไรครับ เพราะสังเกตว่า Sheet1 จะมีค่าซ้ำแค่ 2 ค่า :mrgreen:

Re: ต้องการคัดลอกข้อมูลแบบมีเงื่อนไข ด้วย VBA

Posted: Sat Jan 22, 2011 12:19 am
by mephis9
เรียนอาจารย์
สามารถทับค่าเดิมได้(ถ้ามี) แต่สำหรับตารางก่อนใช้งานจะ clear เป็นฟอร์มเปล่า
ข้อมูลจะเปลี่ยนค่าไปทุกวัน โดยรหัสสินค้าจะแยกอยู่ 2 ที่
ใน 1 ชุดตารางมี 3 แถว
แถวที่ 1 เท่ากับ รหัสที่ซ้ำกัน location A
แถวที่ 2 เท่ากับ รหัสที่ซ้ำกัน location B
แต่ในการนำไปใช้จะต้องนำยอดมารวมกันใน
แถวที่ 3 จัดเป็นผลรวม ของรหัสที่อยู่ A และ B ครับ

Re: ต้องการคัดลอกข้อมูลแบบมีเงื่อนไข ด้วย VBA

Posted: Sat Jan 22, 2011 1:43 am
by hellish
hellish wrote:เรียนอ.คนควน
มีข้อสอบถามเรื่องคัดลอกข้อมูลแบบมีเงื่อนไข ด้วย VBA
ตัวอย่างปัญหาคือ
มีข้อมูลชีทที่ 1 แถวที่ 1 รหัส 200001 อยู่ location A
แถวที่ 2 รหัส 200001 อยู่ location B
แถวที่ 3 รหัส 200002 อยู่ location B
แถวที่ 4 รหัส 200003 อยู่ location B
ความต้องการคือ คัดลอกข้อมูลที่มี รหัสซ้ำกัน ของแถวที่ 1 และ 2 ไปพร้อมกัน เพื่อไปวางในตารางชีทที่ 2
ที่จัดตารางเป็นชุดๆ ละ 3 แถว ส่วนข้อมูลแถวที่ 3 ต้องไปอยู่ในตารางชุดถัดไปของชีทที่ 2
จะต้องใส่เงื่อนไขแบบใด
ตาม file ที่แนบมาครับ
ขอบคุณมากครับ
ปล.เริ่มคิดไม่ออกแล้วครับ
***-------------------------------------------------------------------------

เรียนอาจารย์
แก้ปัญหาได้แล้วครับ นอนหลับได้แล้วเย้้ๆๆ