: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

การดึงข้อมูลที่หากซ้ำกันให้ดึงเฉพาะข้อมูลล่าสุด

ฟอรัมถาม-ตอบปัญหาการใช้งาน MS Excel and VBA
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. กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
Dhk
Member
Member
Posts: 14
Joined: Wed Feb 24, 2010 11:17 am

การดึงข้อมูลที่หากซ้ำกันให้ดึงเฉพาะข้อมูลล่าสุด

#1

Post by Dhk »

ต้องการดึงข้อมูลจาก Sheet หนึ่งไปอีก Sheet หนึ่ง โดยข้อมูลที่ดึงไปนั้น ถ้าข้อมูลที่มี Code ซ้ำกันก็ให้ดึงข้อมูลของ Code ที่มีวันที่ล่าสุด ครับ
You do not have the required permissions to view the files attached to this post.
User avatar
snasui
Site Admin
Site Admin
Posts: 30944
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:

Re: การดึงข้อมูลที่หากซ้ำกันให้ดึงเฉพาะข้อมูลล่าสุด

#2

Post by snasui »

:D ลองตามนี้ครับ

ที่ชีท Show
  1. A2 คีย์
    =LOOKUP(CHAR(255),CHOOSE({1,2},"",INDEX(Data!$A$2:$A$13,SMALL(IF(FREQUENCY(MATCH(Data!$A$2:$A$13,Data!$A$2:$A$13,0),ROW(Data!$A$2:$A$13)-ROW(Data!$A$2)+1),ROW(Data!$A$2:$A$13)-ROW(Data!$A$2)+1),ROWS(A$2:A2)))))
    Ctrl+Shift+Enter > Copy ลงด้านล่าง
  2. B2 คีย์
    =IF($A2<>"",LOOKUP(2,1/(Data!$A$2:$A$13=$A2),Data!B$2:B$13),"")
    Enter > Copy ไปด้านขวาและลงด้านล่าง

!
Note: Ctrl+Shift+Enter หมายถึงเมื่อคีย์สูตรแล้ว แทนที่จะกด Enter ให้กดแป้น Ctrl+Shift ค้างไว้แล้วกด Enter เพื่อสร้างเป็นสูตร Array หากกดแป้นถูกต้องสูตรนั้นจะมีเครื่องหมายปีกกาครอบ เช่น {=YourFormulas(...)} ปีกกานี้คีย์เข้าไปเองไม่ได้ ถ้ายังไม่เห็นปีกกาครอบสูตรแสดงว่ากดแป้นให้รับสูตรไม่ถูกต้อง
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:

Re: การดึงข้อมูลพร้อมจัดเลียงแบบ Dynamic

#4

Post by วังวู ช่ง »

เรียน ท่านอาจารย์ และสมาชิกทุกท่านครับ ก่อนอื่นต้องขอโทษเจ้าของกระทู้ครับ
สุดยอดเลียครับ ผมทำงานข้อมูลเหมือนนี้พอดีครับ แต่ผมต้องการดึงออกมาให้ครบครับ แต่ให้จัดเรียงแต่น้อยหาใหย่ทั้ง CODE, MFG Date และ Thru Date แบบ Dynamic ครับ จะใช้อย่างไลครับ
You do not have the required permissions to view the files attached to this post.
Last edited by วังวู ช่ง on Thu Apr 04, 2013 8:21 pm, edited 1 time in total.
User avatar
snasui
Site Admin
Site Admin
Posts: 30944
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:

Re: การดึงข้อมูลที่หากซ้ำกันให้ดึงเฉพาะข้อมูลล่าสุด

#5

Post by snasui »

:D ควรทำตัวอย่างแนบมาและแสดงให้เห็นว่าต้องการผลลัพธ์เป็นอย่างไร จะได้เข้าใจตรงกันครับ
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:

Re: การดึงข้อมูลที่หากซ้ำกันให้ดึงเฉพาะข้อมูลล่าสุด

#6

Post by วังวู ช่ง »

snasui wrote::D ควรทำตัวอย่างแนบมาและแสดงให้เห็นว่าต้องการผลลัพธ์เป็นอย่างไร จะได้เข้าใจตรงกันครับ
ขอโทษครับ ไฟล์เป็นแบบนี้ครับ
You do not have the required permissions to view the files attached to this post.
User avatar
snasui
Site Admin
Site Admin
Posts: 30944
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:

Re: การดึงข้อมูลที่หากซ้ำกันให้ดึงเฉพาะข้อมูลล่าสุด

#7

Post by snasui »

:D ลองตามนี้ครับ
  1. เซลล์ G2 คีย์
    =TEXT(SMALL(SUBSTITUTE($A$2:$A$13,"-","")+0,ROWS(G$2:G2)),"00-00-00000")
    Ctrl+Shift+Enter > Copy ลงด้านล่าง
  2. เซลล์ H2 คีย์
    =INDEX(B$2:B$13,SMALL(IF($A$2:$A$13=$G2,ROW($A$2:$A$13)-ROW($A$2)+1),COUNTIF($G$2:$G2,$G2)))
    Enter > Copy ไป I2 และ Copy ลงด้านล่าง
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:

Re: การดึงข้อมูลที่หากซ้ำกันให้ดึงเฉพาะข้อมูลล่าสุด

#8

Post by วังวู ช่ง »

snasui wrote::D ลองตามนี้ครับ
  1. เซลล์ G2 คีย์
    =TEXT(SMALL(SUBSTITUTE($A$2:$A$13,"-","")+0,ROWS(G$2:G2)),"00-00-00000")
    Ctrl+Shift+Enter > Copy ลงด้านล่าง
  2. เซลล์ H2 คีย์
    =INDEX(B$2:B$13,SMALL(IF($A$2:$A$13=$G2,ROW($A$2:$A$13)-ROW($A$2)+1),COUNTIF($G$2:$G2,$G2)))
    Enter > Copy ไป I2 และ Copy ลงด้านล่าง
ผนออกมาเป็นแบบนี้ครับ
01-88-00001 3/1/2011 3/1/2012
01-88-00001 #NUM! #NUM!
01-88-00001 #NUM! #NUM!
01-88-00002 3/1/2011 3/1/2012
01-88-00003 10/1/2012 10/1/2013
02-88-00001 15/1/2013 15/1/2014
02-88-00002 3/1/2011 3/1/2012
02-88-00002 #NUM! #NUM!
02-88-00003 15/1/2013 15/1/2014
03-88-00001 5/1/2012 5/1/2013
03-88-00002 20/1/2013 20/1/2014
03-88-00003 7/1/2013 7/1/2014
You do not have the required permissions to view the files attached to this post.
User avatar
snasui
Site Admin
Site Admin
Posts: 30944
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:

Re: การดึงข้อมูลที่หากซ้ำกันให้ดึงเฉพาะข้อมูลล่าสุด

#9

Post by snasui »

:o ข้อ 2 ก็ต้อง Ctrl+Shift+Enter เช่นกัน ผมคีย์ตกไปครับ
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:

Re: การดึงข้อมูลที่หากซ้ำกันให้ดึงเฉพาะข้อมูลล่าสุด

#10

Post by วังวู ช่ง »

snasui wrote::o ข้อ 2 ก็ต้อง Ctrl+Shift+Enter เช่นกัน ผมคีย์ตกไปครับ
ขอบคุณท่านอาจารย์ครับ ผมทำตามได้แล้วแต่ไม่ค่อยรู้ดี ศึกษาก่อนเป็นไงค่อยรบกวนอีกครับ
Post Reply