snasui.com ยินดีต้อนรับ
ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ ระบุ Version ของ Excel
ฟอรัมถาม-ตอบปัญหาการใช้งาน MS Excel and VBA
Forum rules
ไม่อนุญาตให้ใช้ภาษาแชทในการถามและตอบปัญหา ไม่ใช้คำว่า "คับ" หรือ "อ่ะครับ" แทนคำว่า "ครับ" ไม่ใช้คำว่า "เด๋ว" แทนคำว่า "เดี๋ยว" เป็นต้น เนื่องจากเมื่อแปลเป็นภาษาต่างประเทศแล้วจะให้ความหมายผิดไปจากที่ควรจะเป็น
ห้ามถามโดยระบุชื่อผู้ตอบและต้องตั้งชื่อกระทู้ให้สื่อถึงปัญหาที่จะถาม ไม่ตั้งชื่อว่า ช่วยด้วยครับ, มีปัญหามาปรึกษาครับ เป็นต้น
กรุณาอธิบายปัญหาและระบุคำตอบที่ต้องการมาในกระทู้ด้วยเสมอถึงแม้จะอธิบายไว้ในไฟล์แนบแล้วก็ตาม ทั้งนี้เพื่ออำนวยความสะดวกแก่เพื่อนสมาชิกในการค้นหาข้อมูล
กรุณาแนบไฟล์ตัวอย่างพร้อมแสดงคำตอบที่ถูกต้องมาในไฟล์ด้วยเพื่อให้ง่ายต่อการทำความเข้าใจและสะดวกต่อการตอบคำถาม (ขนาดไฟล์ไม่เกิน 500Kb ขนาดภาพไม่เกิน 800*600 Pixel) ไม่แนบเป็น Link มาจากแหล่งอื่นที่อาจจะถูกลบทิ้งไปโดยต้นทางในภายหลัง นอกจากนี้ไม่ควรแนบไฟล์ที่มีข้อมูลสำคัญอันก่อให้เกิดความเสียหายกับตนเองและผู้อื่น
กรณีเป็นคำถามเกี่ยวกับ Programming เช่น VBA, VB.Net, C#, SQL ฯลฯ ต้องลองเขียนมาเองก่อนเสมอ ถามเฉพาะที่ติดปัญหา ระบุ Module, Procedure ที่ติดปัญหาให้ชัดเจน กรุณาโพสต์ Code ให้แสดงเป็น Code คือเปิดด้วย [code]
และปิดด้วย [/code]
ตัวอย่างเช่น [code]dim r as range[/code]
เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่าง)
กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
ajsudkedt
Gold
Posts: 1173 Joined: Thu Jan 28, 2010 11:08 am
Excel Ver: 2021
#1
Post
by ajsudkedt » Tue Sep 02, 2025 4:14 am
จากไฟล์แนบ ถ้าโจทย์คำถามที่ชีต input เป็นข้อความที่ยาว
สูตรที่ชีต formular ที่คอลัมน์ D:I จะ error
ต้องปรับแก้สูตรอย่างไรครับ
You do not have the required permissions to view the files attached to this post.
snasui
Site Admin
Posts: 31118 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019, 365
Contact:
#2
Post
by snasui » Tue Sep 02, 2025 1:13 pm
ตัวอย่างสูตรตามด้านล่างครับ
ที่ D2 คีย์
=INDEX(input!A:A, MATCH(LEFT(B2,255), INDEX(LEFT(input!$A$1:$A$71,255),0), 0) + 6)
Enter > Copy ลงด้านล่าง
ที่ E2 คีย์
=INDEX(input!$A:$A,MATCH(LEFT($B2,255),INDEX(LEFT(input!$A$1:$A$71,255),0),0)+COLUMNS($E2:E2))
Enter > Copy ไปด้านขวาและลงด้านล่าง
! MATCH ไม่สามารถจับคู่ข้อความที่ยาวเกิน 255 ตัวอักษรได้โดยตรง จึงใช้ LEFT(...,255) เพื่อจำกัดความยาวและหลีกเลี่ยงข้อผิดพลาด
ajsudkedt
Gold
Posts: 1173 Joined: Thu Jan 28, 2010 11:08 am
Excel Ver: 2021
#3
Post
by ajsudkedt » Tue Sep 02, 2025 5:25 pm
snasui wrote: Tue Sep 02, 2025 1:13 pm
ตัวอย่างสูตรตามด้านล่างครับ
ที่ D2 คีย์
=INDEX(input!A:A, MATCH(LEFT(B2,255), INDEX(LEFT(input!$A$1:$A$71,255),0), 0) + 6)
Enter > Copy ลงด้านล่าง
ที่ E2 คีย์
=INDEX(input!$A:$A,MATCH(LEFT($B2,255),INDEX(LEFT(input!$A$1:$A$71,255),0),0)+COLUMNS($E2:E2))
Enter > Copy ไปด้านขวาและลงด้านล่าง
! MATCH ไม่สามารถจับคู่ข้อความที่ยาวเกิน 255 ตัวอักษรได้โดยตรง จึงใช้ LEFT(...,255) เพื่อจำกัดความยาวและหลีกเลี่ยงข้อผิดพลาด
กราบขอบพระคุณอาจารย์มากครับ
สูตรที่ให้มาได้ผลดั่งต้องการเลย...ครับ
ajsudkedt
Gold
Posts: 1173 Joined: Thu Jan 28, 2010 11:08 am
Excel Ver: 2021
#4
Post
by ajsudkedt » Wed Sep 03, 2025 5:22 am
ถามต่อครับ
จากไฟล์แนบ ถ้าโจทย์คำถามที่คอลัมน์ B เป็นข้อความที่ยาว
สูตรที่ช่องคำถามที่คอลัมน์ K จะไม่แสดงคำถาม
ต้องปรับแก้สูตรอย่างไรครับ
You do not have the required permissions to view the files attached to this post.
snasui
Site Admin
Posts: 31118 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019, 365
Contact:
#5
Post
by snasui » Wed Sep 03, 2025 6:43 am
ในเครื่องผมสามารถแสดงผลลัพธ์ได้ปกติครับ
สูตรนั้นไม่ต้องกดแป้น Ctrl+Shift+Enter ลองคลิกที่ K1 > กดแป้น F2 เพื่อ Edit เซลล์ > Enter > Copy สูตรลงด้านล่างใหม่
หากยังไม่ได้ผลลัพธ์ให้ลองทำการ Replace เพื่อ Activate สูตรเสียใหม่โดย กดแป้น Ctrl+F เพื่อเปิดกล่องโต้ตอบ Find & Replace > ช่องบนคีย์ =, ช่องล่างคีย์ = จากนั้นคลิกปุ่ม Replace All
ajsudkedt
Gold
Posts: 1173 Joined: Thu Jan 28, 2010 11:08 am
Excel Ver: 2021
#6
Post
by ajsudkedt » Wed Sep 03, 2025 4:55 pm
snasui wrote: Wed Sep 03, 2025 6:43 am
ในเครื่องผมสามารถแสดงผลลัพธ์ได้ปกติครับ
สูตรนั้นไม่ต้องกดแป้น Ctrl+Shift+Enter ลองคลิกที่ K1 > กดแป้น F2 เพื่อ Edit เซลล์ > Enter > Copy สูตรลงด้านล่างใหม่
หากยังไม่ได้ผลลัพธ์ให้ลองทำการ Replace เพื่อ Activate สูตรเสียใหม่โดย กดแป้น Ctrl+F เพื่อเปิดกล่องโต้ตอบ Find & Replace > ช่องบนคีย์ =, ช่องล่างคีย์ = จากนั้นคลิกปุ่ม Replace All
ลองทำตามที่แนะนำ ทั้ง 2 วิธีแล้ว ยังไม่แสดงโจทย์คำถามที่คอลัมน์ K ของแต่ละข้อครับ
แต่ลองลบคำถาม ที่คอลัมน์ B ให้สั้นลง โจทย์คำถาม ที่คอลัมน์ K ถึงแสดงขึ้นมา ครับ
ไม่แน่ว่าจะต้องปรับสูตรอย่างไรครับ
snasui
Site Admin
Posts: 31118 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019, 365
Contact:
#7
Post
by snasui » Wed Sep 03, 2025 8:16 pm
จากโปรไฟล์แจ้งว่าใช้ Excel 2019 มันควรจะทำงานได้เพราะผมก็ใช้ 2019 เช่นกันครับ
ลองปรับสูตรที่ K1 เป็นด้านล่างครับ
=IFERROR(IF(N1=1,M1&" "& INDEX($B$2:$B$101 ,M1),IF(N1=7,"ANSWER: "&SUBSTITUTE(INDEX($E$1:$J$1,INDEX($D$2:$D$101,M1)),")",""),INDEX($E$1:$J$1&" "&$E$2:$J$101,M1,N1-1))),"")
Enter > Copy ลงด้านล่าง
ajsudkedt
Gold
Posts: 1173 Joined: Thu Jan 28, 2010 11:08 am
Excel Ver: 2021
#8
Post
by ajsudkedt » Fri Sep 05, 2025 10:42 am
snasui wrote: Wed Sep 03, 2025 8:16 pm
จากโปรไฟล์แจ้งว่าใช้ Excel 2019 มันควรจะทำงานได้เพราะผมก็ใช้ 2019 เช่นกันครับ
ลองปรับสูตรที่ K1 เป็นด้านล่างครับ
=IFERROR(IF(N1=1,M1&" "& INDEX($B$2:$B$101 ,M1),IF(N1=7,"ANSWER: "&SUBSTITUTE(INDEX($E$1:$J$1,INDEX($D$2:$D$101,M1)),")",""),INDEX($E$1:$J$1&" "&$E$2:$J$101,M1,N1-1))),"")
Enter > Copy ลงด้านล่าง
กราบขอบพระคุณมากครับ สูตรที่ให้มา ให้ผลดั่งที่ต้องการเลยครับ