Page 1 of 1
VBA การดึงข้อมูลจากไฟล์ที่มีคอลัมภ์ต่างกัน
Posted: Thu Sep 21, 2023 12:19 pm
by Jirawat namrach
รบกวนสอบถามครับ พอดีมีไฟล์อยู่ 2 อย่างที่มีข้อมูล Code, Name, Qty แต่อยู่คนละคอลัมภ์ โดยทั้ง 2 ไฟล์ต่างกันที่ชื่อ ไฟล์หนึ่งมีแต่ตัวเลข อีกไฟล์หนึ่งมีคำว่า TSS นำหน้า หากใส่ข้อมูลตามชื่อไฟล์ใน B1 แล้วมีคำว่า TSS.... ให้ดึงจากคอลัมภ์ C,D,N แต่ถ้าใน B1 ไม่มีคำว่า TSS ให้ดึงจาก คอลัมภ์ D,E,Q ต้องแก้ Code แบบไหนครับ
Re: VBA การดึงข้อมูลจากไฟล์ที่มีคอลัมภ์ต่างกัน
Posted: Thu Sep 21, 2023 9:00 pm
by snasui
ปัจจุบันติดปัญหาที่บรรทัดใดครับ
ลักษณะ Code เป็นการดึงข้อมูลจากกไฟล์อื่น ดังนั้นควรแนบไฟล์ต้นทางของข้อมูลมาด้วยจะได้สะดวกในการตอบของเพื่อนสมาชิกครับ
Re: VBA การดึงข้อมูลจากไฟล์ที่มีคอลัมภ์ต่างกัน
Posted: Fri Sep 22, 2023 8:35 am
by Jirawat namrach
ลักษณะงานคือเปิดไฟล์ไว้ แล้วเลือก Sheet ที่จะดึงข้อมูลเข้ามา
ตอนนี้ผมใช้การใส่เลข 1 หรือ ลบเลข 1 ออกจาก Cell C1 เพื่อเลือกการดึงจาก Column ที่ต่างกัน เนื่องจากต้องการดึง Code,Name,Qty จากในไฟล์ ซึ่งไฟล์ทั้ง 2 ชนิด (มีคำว่า TSS นำหน้า และไม่มีคำว่า TSS) รายการที่ต้องการดึงอยู่ต่าง Column กัน หากจะไม่ต้องใส่เลข 1 เป็นเงื่อนไขในการดึงข้อมูล ต้องปรับแก้ Code ยังไงครับ รบกวนด้วยครับ
Re: VBA การดึงข้อมูลจากไฟล์ที่มีคอลัมภ์ต่างกัน
Posted: Fri Sep 22, 2023 9:57 am
by puriwutpokin
ใส่เป็นชื่อไฟล์ตรงๆ ไปเลยได้มั้ยครับ ถ้ามีแค่2ไฟล์ครับ
Re: VBA การดึงข้อมูลจากไฟล์ที่มีคอลัมภ์ต่างกัน
Posted: Fri Sep 22, 2023 11:12 am
by Jirawat namrach
มีไฟล์เยอะครับ เวลาจะไช้ต้องคอยมาลบเลข ก็ไม่เข้าใจว่าเขาทำไมทำต่างคอลัมน์กัน ทั้งที่ข้อมูลภายในเหมือนกัน
Re: VBA การดึงข้อมูลจากไฟล์ที่มีคอลัมภ์ต่างกัน
Posted: Fri Sep 22, 2023 2:45 pm
by puriwutpokin
ทำแบบใช้เงื่อนไข ถ้าไฟล์ที่จะดึงมา มีชื่อ TSS.... ให้ทำแบบหนึ่ง ถ้าไม่มี ให้ทำอีกแบบ โดยดูจากชื่อไฟล์ ก็น่าจะได้นะครับ
Re: VBA การดึงข้อมูลจากไฟล์ที่มีคอลัมภ์ต่างกัน
Posted: Fri Sep 22, 2023 3:16 pm
by Jirawat namrach
ขอบคุณครับ ตอนนี้แก้ไขปัญหาได้แล้วครับตาม Code นี้เลยครับ
Code: Select all
If InStr(.Range("B1"), LCase("T")) < 1 Then