snasui wrote:tong9 wrote:อาจารย์น่าจะหมายถึงเปิดไฟล์ Jan_2012_Gang.xls ไว้เสมอ ใช่ไหมครับ

ใช่แล้วครับ
กรณีมีไฟล์จำนวนมากและไม่ต้องการเปิดไฟล์ไว้ก่อน ไม่สามารถใช้สูตรดึงค่ามาได้ คงต้องพึ่ง VBA และหากจะใช้ VBA จำเป็นต้องเขียนมาก่อนเสมอ ติดตรงไหนสามารถถามมาได้เรื่อย ๆ ครับ
ผมไม่มีความรู้เรื่องการเขียน VBA เลยครับ แต่ไปค้นเจอกระทู้เก่าที่อาจารย์เคยตอบไว้ครับ
http://topicstock-tech.pantip.com/tech/ ... 20478.html
**************
วิธีการ
1. เป็นไฟล์เปล่าขึ้นมา 1 ไฟล์
2. ที่ A1 คีย์ ="='D:\Data\"
3. ที่ B2:B200 เป็นชื่อโรงเรียน
4. ที่ C1:F1 คีย์ A2, B2, C2, D2 ตามลำดับ
5. ที่ C2 คีย์ =$A$1&"["&$B2&".xls]Sheet1'!"&C$1
6. Copy ข้อ 5 ไปวาง C2:F200
7. Copy ข้อ 6 แล้ววางเป็น Value
8. เ้ข้าเมนู Edit > Replace ทั้งช่องบนและช่องล่างใ่ส่เครื่องหมาย = จากนั้นคลิกปุ่ม Replace All ดูรูปประกอบด้านล่างครับ
**************
เลยมีคำถามเพิ่มเติมจากกระทู้เก่าดังนี้ครับ
1. มีรูปภาพเต็มๆ ไหมครับ เพราะกระทู้เก่าไม่มีรูปแล้ว
2. ถ้าจะไปดึงข้อมูลเป็นลักษณะแบบ =sumif..... จะต้องใช้ format อย่างไรครับ
รบกวนตอบอีกคร้ังนะครับ