Snasui Excel Forum

เรียนอาจาร์ยครับและทุกท่านครับ
ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBAนะครับ ผมทำแล้วมาแค่แถวแรกแต่ต้องการมาทั้งหมดตามไฟล์แนบนะครับ
-แถวแรก Cell ซ้ำกัน copyมาไว้sheetถัดไป
-แถวแรก cell ไม่ซ้ำกันcopyมาไว้sheetถัดไป
ขอบพระคุณครับ
อาร์ต

ช่วยอธิบายเพิ่มเติมว่ามีสาเหตุใดที่ต้อง Copy ไปทีละกลุ่ม เนื่องจากตามลักษณะที่ถามมานั้นเป็นการ Copy ทั้งหมดทุกกลุ่ม การ Copy จึงควร Copy ไปทีเดียวทั้งหมดครับ

เรียนอาจาร์ยครับ
ผมยกตัวอย่างเพราะว่างานจริงหลังจากimport file เข้ามาแล้วจะต้องแยกไว้คนละsheetกัน ซึ่ง importเข้ามาผมพอทำได้อยู่แต่หลังจากimportเข้ามาแล้ว
จะติดตรงนี้นะครับไปต่อไม่ได้
-ซึ่งที่ผมทำไว้มันมาแค่แถวแรก
ตัวอย่างงานผมแนบมาให้อาจาร์ยช่วยดูนะครับ
ขอบพระคุณครับ

ผมตอบหลัก ๆ ให้ก่อนแล้วกัน ลองบันทึก Macro เพื่อดู Code ที่ได้แล้วปรับใช้ครับ

1. แทรกบรรทัดแรกของข้อมูลแล้วใส่หัว Field เป็นค่าใด ๆ เช่น Columnxxx (xxx คือตัวเลข Run ไปตามคอลัมน์ ดังนั้น A1 จะได้เป็น Column001)
2. Copy คอลัมน์ A ไปทำ Unique Value ในชีทใด ๆ ซึ่งทำเป็นชีทชั่วคราว
3. นำค่าจากข้อ 2 มาทำการ Filter หาข้อมูลในข้อ 1 แล้ว Copy ไปยังเป้าหมายตามต้องการ

ผมจะเข้าไปอ่านในนี้ก่อนนะครับ
http://snasui.blogspot.com/2012/01/unique-value.html
จะพยายามนะครับ แต่พอได้แนวทางแล้วครับ

ควรเป็น Link นี้ครับ http://snasui.blogspot.com/2010/05/blog-post.html

ขอบพระคุณอาจาร์ยมากครับขอเวลาศึกษาหน่อยนะครับ
อาร์ตครับ

เรียนอาจาร์ยครับ
ผมขออนุญาตให้fileที่ แนบมาล่าสุดนะครับ ผมค้นเขียนตาม webมา แต่จะให้มันทำงานต่อไปต้องกำหนดอย่างไรครับ
ขออาจาร์ยช่วยดูให้ด้วยนะครับ
อาร์ตครับ(ปาดเหงื่อแล้วครับ)

ผมไม่พบว่าได้ทำตามที่ผมแนะนำไปครับ

พอผมทำตามที่อาจาร์ยแนะไว้ ตัวซ้ำกันเอามาแค่ตัวเดียวน่ะครับ (หรือว่าอาจจะทำไม่ถูกต้องก็ได้)
ผมก็เลยทำตามด้านบนเองน่ะครับ
ขอบคุณครับ

snasui wrote: ผมตอบหลัก ๆ ให้ก่อนแล้วกัน ลองบันทึก Macro เพื่อดู Code ที่ได้แล้วปรับใช้ครับ

1. แทรกบรรทัดแรกของข้อมูลแล้วใส่หัว Field เป็นค่าใด ๆ เช่น Columnxxx (xxx คือตัวเลข Run ไปตามคอลัมน์ ดังนั้น A1 จะได้เป็น Column001)
2. Copy คอลัมน์ A ไปทำ Unique Value ในชีทใด ๆ ซึ่งทำเป็นชีทชั่วคราว
3. นำค่าจากข้อ 2 มาทำการ Filter หาข้อมูลในข้อ 1 แล้ว Copy ไปยังเป้าหมายตามต้องการ

คุณได้ทำข้อไหนใน 3 ข้อนี้แล้วบ้างครับ ไฟล์ที่ทำแล้วอยู่ที่ไหน สำหรับข้อ 3 คุณเข้าใจว่าอย่างไรครับ

เรียนอาจาร์ยครับ
ผมทำโดย "การหารายการที่ไม่ซ้ำด้วย Advanced Filter "นะครับตามไฟล์แนบ
เหมือนผมยังงงงงอยู่
แหะแหะ

ขั้นแรกทำข้อ1 ตามอาจารย์คือแทรกหัว field เช่นเลขที่ ชื่อ จำนวน แล้วแต่จะตั้ง
แล้วดูการใช้ Advanced Filter ทำ uniqueเหลือเฉพาะรายการที่ไม่ซ้ำ
http://www.youtube.com/watch?feature=pl ... tfe4RmgFSs

เป็นอย่างนี้นี่เอง
ขอบคุณครับ หายงงแล้ว อาจาร์ยและคุณtuothai
<==>