Page 1 of 1

ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Wed Sep 12, 2012 12:33 pm
by คน-ควนรู
:D ทราบว่าเป็น VBA ไม่ต้องบอกโค๊ตก็ได้ครับสามารถนำมาใช้งานได้เลยโดยอัตโนมัติ ;)

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Wed Sep 12, 2012 12:59 pm
by snasui
:D สามารถดาวน์โหลดได้ที่นี่ครับ viewtopic.php?f=9&t=2861 และควรอ่านความเห็นต่าง ๆ ในกระทู้นั้นประกอบด้วยครับ

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Thu Sep 13, 2012 3:02 pm
by คน-ควนรู
:flw: ยังทำไม่ได้ครับตั้งชื่อโฟลเดอร์และตั้งชื่อไฟล์แล้ว ชื่อชีทในแต่ละไฟล์ก็เหมือนกัน เปิด macro แล้ว มันขึ้น compile errer in hidden module : module 1

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Thu Sep 13, 2012 3:09 pm
by snasui
:D สำหรับ Macro ดูไม่ได้เนื่องจากผม Lock ไว้ ส่วนที่บอกว่าทดสอบแล้วไม่ได้ ลองแนบไฟล์ที่ได้กรอกค่าที่ต้องการไว้แล้วมาดูกันครับ

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 5:18 pm
by คน-ควนรู
ผมได้แนบไฟล์ตัวอย่างมาครับ มีชีทที่ต้องการข้อมูลแนบมาด้วย ไฟล์จริงผมมีหลายชีทและมีหลายไฟล์ ชีทที่ต้องการดึงข้อมูลมีชื่อเหมือนกันตามที่อาจารย์แนะนำไว้ครับ 2012 และ test เป็นชื่อโฟลเดอร์ครับ

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 5:28 pm
by snasui
:D ที่ A1 จำเป็นจะต้องปิดด้วยเครื่องหมาย \ จะกลายเป็น G:\2012\test\ ผมถึงได้ย้ำว่าให้อ่านความเห็นในกระทู้นั้นประกอบด้วยครับ
snasui wrote: :D สามารถดาวน์โหลดได้ที่นี่ครับ viewtopic.php?f=9&t=2861 และควรอ่านความเห็นต่าง ๆ ในกระทู้นั้นประกอบด้วยครับ

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 5:35 pm
by คน-ควนรู
ใส่ \ ปิดท้ายแล้วก็ยังไม่ได้ครับ ถ้าหากในแต่ละไฟล์มีหลายชีทจะมีปัญหาหรือไม่ครับ

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 5:38 pm
by snasui
:D ไฟล์มีหลายชีท ไม่มีปัญหาครับ Code ในไฟล์นั้นจะดึงมาเฉพาะชีทที่เรากรอกใน A2 เท่านั้น กรณีต้องการดึงมาจากทุกชีทให้ใช้ Version 2 ครับ

กรณีดึงไม่ได้ ช่วยแจ้งว่า โปรแกรมมีการฟ้องอย่างไรหรือไม่ หากส่งไฟล์ตัวอย่างที่เป็นต้นแหล่งของข้อมูลมาด้วยก็จะดีจะได้ช่วยดูให้ได้ครับ

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 5:54 pm
by คน-ควนรู
มันเป็นแบบนี้ครับ
macrotest.png

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 6:05 pm
by snasui
:D ลองตามนี้ครับ
  1. เปิดไฟล์ Excel ว่าง ๆ ขึ้นมา 1 ไฟล์
  2. กดแป้น Alt+F11 เพื่อเข้าไปยัง VBE
  3. เข้าเมนู Tools > Reference > ตรวจสอบค่าในกรอบสี่เหลี่ยมตามภาพด้านล่างว่ามีหรือไม่หรือขาดรายการใด
ให้ตรวจสอบว่ามีหรือไม่มี โดยไม่ต้องสนใจว่ามีเครื่องหมายถูกอยู่ข้างหน้าหรือไม่ หากขาดรายการใดช่วยแจ้งมาด้วยครับ

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 6:13 pm
by คน-ควนรู
:P ไม่มีครับ เมื่อกดได้ตามนั้นแล้วทำอย่างไรต่อครับ

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 6:15 pm
by snasui
:D ถ้าไม่มีเลย ใช้ไฟล์ที่ผมทำไปให้ไม่ได้ครับ ย้ำอีกทีว่าให้ตรวจสอบว่ามีหรือไม่มีโดยไม่ต้องคำนึงว่ามีเครื่องหมายถูกอยู่ข้างหน้าหรือไม่ให้เลื่อนไปดูด้านล่าง ๆ รายการอาจจะไม่ได้เรียงก็เป็นได้

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 6:29 pm
by คน-ควนรู
ดูใหม่แล้วครับตัวแรกมันมีตัวเลขระบุสูงสุดแค่ Microsoft ActiveX Data Object 2.8 Library
ตัวที่สองมีครับ
ตัวที่สามก็มีตัวเลขระบุสูงสุดที่ Microsoft ADO Ext. 2.8 for DDL and Security
ถ้ามันไม่สมบูรณ์ผมต้องทำอย่างไรครับ

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 6:31 pm
by snasui
คน-ควนรู wrote:ดูใหม่แล้วครับตัวแรกมันมีตัวเลขระบุสูงสุดแค่ Microsoft ActiveX Data Object 2.8 Library
...
:D เท่านี้ก็เพียงพอที่จะทำงานได้ ใช้ไฟล์ด้านล่างแทนไฟล์เดิมครับ

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 6:43 pm
by คน-ควนรู
:lol: มันมาตามต้องการแล้วครับ ขอถามอาจารย์ครับว่า มันเป็นปัญหาที่ MS office 2007 ที่ผมมีอยู่หรือว่าเป็นที่ การปรับ code ของอาจารย์ครับเพราะว่าผมยังไม่ได้นำไฟล์แรกไปทดสอบกับเครื่องอื่น จึงไม่รู้ครับว่ามีปัญหาหรือไม่ ?

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 6:46 pm
by snasui
:lol: มันไม่ได้อยู่ที่ Code ผมครับ :lol:

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Sun Sep 16, 2012 6:52 pm
by คน-ควนรู
:lol: :lol: ผมไม่ค่อยรู้เรื่องด้านนี้ครับ แต่ขอขอบคุณอาจารย์ครับที่ช่วยให้งานของผมเร็วขึ้นมาอีกโขเลยครับ พอจะมองเห็นทางสว่างขึ้นมาบ้างครับ :tt: ;)

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Fri Sep 21, 2012 10:26 pm
by คน-ควนรู
:D ถ้าเช่นนั้นมันเป็นเพราะ Windows 32 bit และ 64 bit ใช่หรือไม่ครับ :P

Re: ขอวิธีนำข้อมูลในแต่ไฟล์และชื่อชีทเหมือนกันมาต่อเรียงกัน

Posted: Fri Sep 21, 2012 10:34 pm
by snasui
snasui wrote::lol: มันไม่ได้อยู่ที่ Code ผมครับ :lol:
:D ก็แสดงว่าอยู่ที่ Excel 2007 นั่นแหละครับที่ไมรองรับ Reference ตัวใหม่ ผมถึงต้องปรับมาให้ใช้ตัวต่ำลงมา จึงบอกว่าไม่ได้อยู่ที่ Code ผมครับ