EXCEL TOOLS
Excel Add-ins ที่พัฒนาโดยคุณสันติพงศ์ ณสุย (MVP Excel 2010-2020) ด้วยภาษา C# เพื่อแก้ไขปัญหาไฟล์ใหญ่ คำนวณนาน ทำงานช้า จัดการข้อมูลต่าง ๆ ที่ทำงานประจำวันได้อย่างสะดวกรวดเร็ว สนใจคลิกไปดูได้ที่นี่ครับ => Excel Tools
Excel Add-ins ที่พัฒนาโดยคุณสันติพงศ์ ณสุย (MVP Excel 2010-2020) ด้วยภาษา C# เพื่อแก้ไขปัญหาไฟล์ใหญ่ คำนวณนาน ทำงานช้า จัดการข้อมูลต่าง ๆ ที่ทำงานประจำวันได้อย่างสะดวกรวดเร็ว สนใจคลิกไปดูได้ที่นี่ครับ => Excel Tools
[code]
และปิดด้วย [/code]
ตัวอย่างเช่น [code]dim r as range[/code]
เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่าง)snasui wrote: Sat Jan 29, 2022 9:30 amแถมอีกตัวอย่างครับ
เซลล์ B2 คีย์
=IF(COLUMNS(B:$G)>5,LEFT($A2,FIND(C2,$A2)-1),SUBSTITUTE(SUBSTITUTE(FILTERXML("<t><s>"&SUBSTITUTE(SUBSTITUTE($A2,",","|")," ","</s><s>")&"</s></t>","//s["&LEN($A2)-LEN(SUBSTITUTE($A2," ",""))+1-COLUMNS(B:$G)+1&"]"),"|",","),"โทรศัพท์",""))
Enter > Copy ไปด้านขวาและลงด้านล่าง