snasui.com ยินดีต้อนรับ
ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ ระบุ Version ของ Excel
ฟอรัมสำหรับแจกจ่ายแบ่งปันไฟล์ รวมทั้งแหล่งความรู้ต่าง ๆ เกี่ยวกับ Excel
snasui
Site Admin
Posts: 30917 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:
#1
Post
by snasui » Thu Jan 03, 2019 12:03 am
แจกไฟล์ตัวอย่างพร้อมสูตรแสดงการรวมข้อมูลจากหลายไฟล์หลายชีตมาไว้ในชีตเดียวเรียงต่อกันไปทางด้านล่างเพื่อทำเป็น Database
ที่ H1 คีย์
=SUMPRODUCT(COUNTIF(INDIRECT("'"&G2:G6&"'!A2:A100"),"<>"))
Enter > Copy ลงด้านล่าง
ที่ H2 คีย์
=SUMPRODUCT(COUNTIF(INDIRECT("'"&G$2:G2&"'!A2:A100"),"<>"))-SUMPRODUCT(COUNTIF(INDIRECT("'"&G2&"'!A2:A100"),"<>"))+1
Enter > Copy ลงด้านล่าง
ที่ E2 คีย์
=IF(ROWS(E$2:E2)>$H$1,"",LOOKUP(ROWS(E$2:E2),$H$2:$H$6,$G$2:$G$6))
Enter > Copy ลงด้านล่าง
ที่ A2 คีย์
=IF($E2="","",INDIRECT("'"&$E2&"'!R"&COUNTIF($E$2:$E2,$E2)+1&"C",0))
Enter > Copy ไปด้านขวาและลงด้านล่าง
! ต้องเปิดไฟล์พร้อมกันทุกไฟล์สูตรจึงจะทำงานถูกต้อง
Attachments
List_Data_Form_MultipleFiles_Sheets_Pic List_Data_Form_MultipleFiles_Sheets.png (49.02 KiB) Viewed 1807 times
List_Data_Form_MultipleFiles_Sheets.zip
List_Data_Form_MultipleFiles_Sheets_Zip (37.05 KiB) Downloaded 281 times
teerin
Member
Posts: 71 Joined: Thu Jan 03, 2019 2:51 pm
Excel Ver: 365
#2
Post
by teerin » Fri Feb 01, 2019 11:08 am
ขออนุญาตสอบถามครับ ถ้าจะเปลี่ยนแหล่งข้อมูลจากสูตรตัวอย่าง ต้องแก้สูตรตรงไหนครับ
snasui
Site Admin
Posts: 30917 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:
#3
Post
by snasui » Fri Feb 01, 2019 6:55 pm
การแก้ไขแหล่งข้อมูลให้เปลี่ยนค่าในคอลัมน์ G เป็นแหล่งข้อมูลที่ใช้จริงครับ
teerin
Member
Posts: 71 Joined: Thu Jan 03, 2019 2:51 pm
Excel Ver: 365
#4
Post
by teerin » Mon Feb 04, 2019 11:59 am
ขอบพระคุณครับอาจารย์