:D snasui.com ยินดีต้อนรับ :D
ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย :thup: สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ :arrow: ระบุ Version ของ Excel
:!: โปรดทราบ :!:
  1. กรุณาอ่านกฎการใช้บอร์ด (Forum rules) ในตำแหน่งด้านบนของแต่ละบอร์ด
  2. การสมัครสมาชิก การ Login การกู้คืนรหัสผ่าน
    1. สมัครสมาชิกดูขั้นตอนได้ที่ :arrow: สมัครสมาชิก
    2. Login เข้าระบบโดยคลิกปุ่ม Login ตรงมุมขวาบนของหน้านี้ :roll:
    3. การ Login ผ่าน Facebook ดูวิธีที่ :arrow: Login ผ่าน Facebook
    4. ลืมรหัสผ่านสามารถรับรหัสใหม่ได้ที่ :arrow: Reset รหัสผ่าน
  3. มีปัญหาการใช้งาน แจ้งผู้ดูแลระบบได้ที่ :arrow: ติดต่อผู้ดูแลระบบ
  4. กำหนดการตั้งค่าส่วนตัว เช่นตั้งค่าภาษาเป็นไทยหรืออังกฤษดูได้ที่ :arrow: ตั้งค่าส่วนตัว
  5. การตั้งและตอบกระทู้ดูได้ที่ :arrow: วิธีการตั้งและตอบกระทู้
  6. การจัดรูปแบบตัวอักษรด้วย bbcode ในช่องแสดงความคิดเห็นดูได้ที่ :arrow: จัดรูปแบบตัวอักษร
  7. กำหนดขนาดตัวอักษรใน Browser ดูได้ที่ :arrow: กำหนดขนาดตัวอักษรใน Browser

ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

ฟอรัมถาม-ตอบปัญหาการใช้งานสูตรและฟังก์ชัน Excel
Forum rules
  1. ไม่อนุญาตให้ใช้ภาษาแชทในการถามและตอบปัญหา ไม่ใช้คำว่า "คับ" หรือ "อ่ะครับ" แทนคำว่า "ครับ" ไม่ใช้คำว่า "เด๋ว" แทนคำว่า "เดี๋ยว" เป็นต้น เนื่องจากเมื่อแปลเป็นภาษาต่างประเทศแล้วจะให้ความหมายผิดไปจากที่ควรจะเป็น
  2. ห้ามถามโดยระบุชื่อผู้ตอบและต้องตั้งชื่อกระทู้ให้สื่อถึงปัญหาที่จะถาม ไม่ตั้งชื่อว่า ช่วยด้วยครับ, มีปัญหามาปรึกษาครับ เป็นต้น
  3. กรุณาอธิบายปัญหาและระบุคำตอบที่ต้องการมาในกระทู้ด้วยเสมอถึงแม้จะอธิบายไว้ในไฟล์แนบแล้วก็ตาม ทั้งนี้เพื่ออำนวยความสะดวกแก่เพื่อนสมาชิกในการค้นหาข้อมูล
  4. กรุณาแนบไฟล์ตัวอย่างพร้อมแสดงคำตอบที่ถูกต้องมาในไฟล์ด้วยเพื่อให้ง่ายต่อการทำความเข้าใจและสะดวกต่อการตอบคำถาม (ขนาดไฟล์ไม่เกิน 500Kb ขนาดภาพไม่เกิน 800*600 Pixel) ไม่แนบเป็น Link มาจากแหล่งอื่นที่อาจจะถูกลบทิ้งไปโดยต้นทางในภายหลัง นอกจากนี้ไม่ควรแนบไฟล์ที่มีข้อมูลสำคัญอันก่อให้เกิดความเสียหายกับตนเองและผู้อื่น
  5. กรณีเป็นคำถามเกี่ยวกับ Programming เช่น VBA, VB.Net, C#, SQL ฯลฯ ต้องลองเขียนมาเองก่อนเสมอ ถามเฉพาะที่ติดปัญหา ระบุ Module, Procedure ที่ติดปัญหาให้ชัดเจน กรุณาโพสต์ Code ให้แสดงเป็น Code คือเปิดด้วย [code] และปิดด้วย [/code] ตัวอย่างเช่น [code]dim r as range[/code] เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่าง)
  6. กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
Post Reply
lotto009
Member
Member
Posts: 157
Joined: Sat Sep 22, 2012 11:53 am

ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#1

Post by lotto009 »

เรียนอาจาร์ยครับและทุกท่านครับ
ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBAนะครับ ผมทำแล้วมาแค่แถวแรกแต่ต้องการมาทั้งหมดตามไฟล์แนบนะครับ
-แถวแรก Cell ซ้ำกัน copyมาไว้sheetถัดไป
-แถวแรก cell ไม่ซ้ำกันcopyมาไว้sheetถัดไป
ขอบพระคุณครับ
อาร์ต
You do not have the required permissions to view the files attached to this post.
Top
User avatar
snasui
Site Admin
Site Admin
Posts: 31255
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
Contact snasui

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#2

Post by snasui »

:D ช่วยอธิบายเพิ่มเติมว่ามีสาเหตุใดที่ต้อง Copy ไปทีละกลุ่ม เนื่องจากตามลักษณะที่ถามมานั้นเป็นการ Copy ทั้งหมดทุกกลุ่ม การ Copy จึงควร Copy ไปทีเดียวทั้งหมดครับ
Top
lotto009
Member
Member
Posts: 157
Joined: Sat Sep 22, 2012 11:53 am

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#3

Post by lotto009 »

เรียนอาจาร์ยครับ
ผมยกตัวอย่างเพราะว่างานจริงหลังจากimport file เข้ามาแล้วจะต้องแยกไว้คนละsheetกัน ซึ่ง importเข้ามาผมพอทำได้อยู่แต่หลังจากimportเข้ามาแล้ว
จะติดตรงนี้นะครับไปต่อไม่ได้
-ซึ่งที่ผมทำไว้มันมาแค่แถวแรก
ตัวอย่างงานผมแนบมาให้อาจาร์ยช่วยดูนะครับ
ขอบพระคุณครับ
You do not have the required permissions to view the files attached to this post.
Top
User avatar
snasui
Site Admin
Site Admin
Posts: 31255
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
Contact snasui

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#4

Post by snasui »

:D ผมตอบหลัก ๆ ให้ก่อนแล้วกัน ลองบันทึก Macro เพื่อดู Code ที่ได้แล้วปรับใช้ครับ
  1. แทรกบรรทัดแรกของข้อมูลแล้วใส่หัว Field เป็นค่าใด ๆ เช่น Columnxxx (xxx คือตัวเลข Run ไปตามคอลัมน์ ดังนั้น A1 จะได้เป็น Column001)
  2. Copy คอลัมน์ A ไปทำ Unique Value ในชีทใด ๆ ซึ่งทำเป็นชีทชั่วคราว
  3. นำค่าจากข้อ 2 มาทำการ Filter หาข้อมูลในข้อ 1 แล้ว Copy ไปยังเป้าหมายตามต้องการ
Top
lotto009
Member
Member
Posts: 157
Joined: Sat Sep 22, 2012 11:53 am

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#5

Post by lotto009 »

ผมจะเข้าไปอ่านในนี้ก่อนนะครับ
http://snasui.blogspot.com/2012/01/unique-value.html
จะพยายามนะครับ แต่พอได้แนวทางแล้วครับ
Top
User avatar
snasui
Site Admin
Site Admin
Posts: 31255
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
Contact snasui

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#6

Post by snasui »

:D ควรเป็น Link นี้ครับ http://snasui.blogspot.com/2010/05/blog-post.html
Top
lotto009
Member
Member
Posts: 157
Joined: Sat Sep 22, 2012 11:53 am

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#7

Post by lotto009 »

ขอบพระคุณอาจาร์ยมากครับขอเวลาศึกษาหน่อยนะครับ
อาร์ตครับ
Top
lotto009
Member
Member
Posts: 157
Joined: Sat Sep 22, 2012 11:53 am

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#8

Post by lotto009 »

เรียนอาจาร์ยครับ
ผมขออนุญาตให้fileที่ แนบมาล่าสุดนะครับ ผมค้นเขียนตาม webมา แต่จะให้มันทำงานต่อไปต้องกำหนดอย่างไรครับ
ขออาจาร์ยช่วยดูให้ด้วยนะครับ
อาร์ตครับ(ปาดเหงื่อแล้วครับ)
You do not have the required permissions to view the files attached to this post.
Top
User avatar
snasui
Site Admin
Site Admin
Posts: 31255
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
Contact snasui

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#9

Post by snasui »

:D ผมไม่พบว่าได้ทำตามที่ผมแนะนำไปครับ
Top
lotto009
Member
Member
Posts: 157
Joined: Sat Sep 22, 2012 11:53 am

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#10

Post by lotto009 »

พอผมทำตามที่อาจาร์ยแนะไว้ ตัวซ้ำกันเอามาแค่ตัวเดียวน่ะครับ (หรือว่าอาจจะทำไม่ถูกต้องก็ได้)
ผมก็เลยทำตามด้านบนเองน่ะครับ
ขอบคุณครับ
Top
User avatar
snasui
Site Admin
Site Admin
Posts: 31255
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
Contact snasui

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#11

Post by snasui »

snasui wrote::D ผมตอบหลัก ๆ ให้ก่อนแล้วกัน ลองบันทึก Macro เพื่อดู Code ที่ได้แล้วปรับใช้ครับ
  1. แทรกบรรทัดแรกของข้อมูลแล้วใส่หัว Field เป็นค่าใด ๆ เช่น Columnxxx (xxx คือตัวเลข Run ไปตามคอลัมน์ ดังนั้น A1 จะได้เป็น Column001)
  2. Copy คอลัมน์ A ไปทำ Unique Value ในชีทใด ๆ ซึ่งทำเป็นชีทชั่วคราว
  3. นำค่าจากข้อ 2 มาทำการ Filter หาข้อมูลในข้อ 1 แล้ว Copy ไปยังเป้าหมายตามต้องการ
คุณได้ทำข้อไหนใน 3 ข้อนี้แล้วบ้างครับ ไฟล์ที่ทำแล้วอยู่ที่ไหน สำหรับข้อ 3 คุณเข้าใจว่าอย่างไรครับ :?:
Top
lotto009
Member
Member
Posts: 157
Joined: Sat Sep 22, 2012 11:53 am

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#12

Post by lotto009 »

เรียนอาจาร์ยครับ
ผมทำโดย "การหารายการที่ไม่ซ้ำด้วย Advanced Filter "นะครับตามไฟล์แนบ
เหมือนผมยังงงงงอยู่
แหะแหะ
You do not have the required permissions to view the files attached to this post.
Top
User avatar
tupthai
Bronze
Bronze
Posts: 302
Joined: Sat Feb 04, 2012 2:49 pm

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#13

Post by tupthai »

ขั้นแรกทำข้อ1 ตามอาจารย์คือแทรกหัว field เช่นเลขที่ ชื่อ จำนวน แล้วแต่จะตั้ง
แล้วดูการใช้ Advanced Filter ทำ uniqueเหลือเฉพาะรายการที่ไม่ซ้ำ
http://www.youtube.com/watch?feature=pl ... tfe4RmgFSs
Top
lotto009
Member
Member
Posts: 157
Joined: Sat Sep 22, 2012 11:53 am

Re: ต้องการcopy cellซ้ำกันไว้อีกsheetด้วยVBA

#14

Post by lotto009 »

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

Return to “Excel Formulas & Functions”