snasui.com ยินดีต้อนรับ
ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ ระบุ Version ของ Excel
ฟอรัมถาม-ตอบปัญหาการใช้งาน MS Excel and VBA
Forum rules
ไม่อนุญาตให้ใช้ภาษาแชทในการถามและตอบปัญหา ไม่ใช้คำว่า "คับ" หรือ "อ่ะครับ" แทนคำว่า "ครับ" ไม่ใช้คำว่า "เด๋ว" แทนคำว่า "เดี๋ยว" เป็นต้น เนื่องจากเมื่อแปลเป็นภาษาต่างประเทศแล้วจะให้ความหมายผิดไปจากที่ควรจะเป็น
ห้ามถามโดยระบุชื่อผู้ตอบและต้องตั้งชื่อกระทู้ให้สื่อถึงปัญหาที่จะถาม ไม่ตั้งชื่อว่า ช่วยด้วยครับ, มีปัญหามาปรึกษาครับ เป็นต้น
กรุณาอธิบายปัญหาและระบุคำตอบที่ต้องการมาในกระทู้ด้วยเสมอถึงแม้จะอธิบายไว้ในไฟล์แนบแล้วก็ตาม ทั้งนี้เพื่ออำนวยความสะดวกแก่เพื่อนสมาชิกในการค้นหาข้อมูล
กรุณาแนบไฟล์ตัวอย่างพร้อมแสดงคำตอบที่ถูกต้องมาในไฟล์ด้วยเพื่อให้ง่ายต่อการทำความเข้าใจและสะดวกต่อการตอบคำถาม (ขนาดไฟล์ไม่เกิน 500Kb ขนาดภาพไม่เกิน 800*600 Pixel) ไม่แนบเป็น Link มาจากแหล่งอื่นที่อาจจะถูกลบทิ้งไปโดยต้นทางในภายหลัง นอกจากนี้ไม่ควรแนบไฟล์ที่มีข้อมูลสำคัญอันก่อให้เกิดความเสียหายกับตนเองและผู้อื่น
กรณีเป็นคำถามเกี่ยวกับ Programming เช่น VBA, VB.Net, C#, SQL ฯลฯ ต้องลองเขียนมาเองก่อนเสมอ ถามเฉพาะที่ติดปัญหา ระบุ Module, Procedure ที่ติดปัญหาให้ชัดเจน กรุณาโพสต์ Code ให้แสดงเป็น Code คือเปิดด้วย [code]
และปิดด้วย [/code]
ตัวอย่างเช่น [code]dim r as range[/code]
เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่าง)
กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
trio16544
Member
Posts: 50 Joined: Wed Mar 25, 2020 7:44 pm
Excel Ver: 2010,365
#1
Post
by trio16544 » Fri Jan 13, 2023 11:02 pm
รบกวนสอบถามครับ ต้องการดึงข้อมูลจากคอลัมน์ A B C มาเรียงต่อกันใน คอลัมน์ D โดยตัดข้อมูลที่ซ้ำกันออก รายละเอียดตามตัวอย่างครับ
ขอบคุณครับ
You do not have the required permissions to view the files attached to this post.
snasui
Site Admin
Posts: 31153 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
#2
Post
by snasui » Sat Jan 14, 2023 5:58 am
กรุณา Update Profile โดยระบุ Version ของ Excel ที่ใช้อยู่จริงตาม Link นี้ด้วยครับ
viewtopic.php?t=17480
ตัวอย่างสูตร Version O365 ครับ
เซลล์ F2 คีย์
UNIQUE(TOCOL(A2:C9,1))
Enter
trio16544
Member
Posts: 50 Joined: Wed Mar 25, 2020 7:44 pm
Excel Ver: 2010,365
#3
Post
by trio16544 » Sat Jan 14, 2023 3:41 pm
Update Profile เรียบร้อยครับ
สอบถามเพิ่มเติมครับ ถ้า Excel 2010 สามารถใช้สูตรเดียวกันได้ใช่ไหมครับ
norkaz
Gold
Posts: 1805 Joined: Wed Jan 12, 2011 7:59 pm
Excel Ver: 2013,365
#4
Post
by norkaz » Sat Jan 14, 2023 3:51 pm
...
Excel 2010 ลองใช้คอลัมน์ มาช่วยครับ
E2 ( Helper)
=INDEX($A$2:$C$9,MOD(ROWS($A$2:A9),8)+1,INT(ROWS($A$2:A9)/8))
Copy ลงไป
D2
=IFERROR(AGGREGATE(15,6,$E$2:$E$99/(MATCH($E$2:$E$99,$E$2:$E$99,0)/($E$2:$E$99<>0)=ROW($E$2:$E$99)-ROW($E$2)+1),ROWS($D$2:D2)),"")
Copy ลงไป
**เพื่อนสมาชิก กรุณาช่วยกดโฆษณาหน้าเพจ เพื่อเป็นการสนับสนุนฟอรั่ม**
Norkaz
You do not have the required permissions to view the files attached to this post.
trio16544
Member
Posts: 50 Joined: Wed Mar 25, 2020 7:44 pm
Excel Ver: 2010,365
#5
Post
by trio16544 » Sat Jan 14, 2023 4:05 pm
ขอบคุณทั้งสองท่านมากครับ
trio16544
Member
Posts: 50 Joined: Wed Mar 25, 2020 7:44 pm
Excel Ver: 2010,365
#6
Post
by trio16544 » Mon Jan 16, 2023 7:40 pm
รบกวนสอบถามครับ ถ้าข้อมูลที่ต้องการดึงมาเป็นข้อความไม่ใช่ตัวเลข ต้องเขียนสูตรอย่างไรครับ ขอบคุณครับ
You do not have the required permissions to view the files attached to this post.
snasui
Site Admin
Posts: 31153 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
#7
Post
by snasui » Mon Jan 16, 2023 11:23 pm
ตัวอย่างสูตรตามด้านล่างครับ
ที่ E2 คีย์
=IFERROR(INDEX($A$2:$C$9,MOD(ROWS($A$2:A9),8)+1,INT(ROWS($A$2:A9)/8))&"","")
Enter > Copy ลงด้านล่าง
ที่ D2 คีย์
=IFERROR(INDEX(E:E,AGGREGATE(15,6,ROW($E$2:$E$30)/(0<FREQUENCY(MATCH($E$2:$E$30,$E$2:$E$30,0),ROW($E$2:$E$30)-ROW($E$2)+1))/($E$2:$E$30<>""),ROWS(D$2:D2))),"")
Enter > Copy ลงด้านล่าง
norkaz
Gold
Posts: 1805 Joined: Wed Jan 12, 2011 7:59 pm
Excel Ver: 2013,365
#8
Post
by norkaz » Tue Jan 17, 2023 1:14 am
...
Excel 365
D2
=UNIQUE(TOCOL(VSTACK(A2:A9,B2:B9,C2:C9),3))
**เพื่อนสมาชิก กรุณาช่วยกดโฆษณาหน้าเพจ เพื่อเป็นการสนับสนุนฟอรั่ม**
Norkaz
trio16544
Member
Posts: 50 Joined: Wed Mar 25, 2020 7:44 pm
Excel Ver: 2010,365
#9
Post
by trio16544 » Thu Jan 19, 2023 10:13 am
ขอบคุณทั้งสองท่านมากครับ