EXCEL TOOLS
Excel Add-ins ที่พัฒนาโดยคุณสันติพงศ์ ณสุย (MVP Excel 2010-2020) ด้วยภาษา C# เพื่อแก้ไขปัญหาไฟล์ใหญ่ คำนวณนาน ทำงานช้า จัดการข้อมูลต่าง ๆ ที่ทำงานประจำวันได้อย่างสะดวกรวดเร็ว สนใจคลิกไปดูได้ที่นี่ครับ => Excel Tools
snasui.com ยินดีต้อนรับ ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย
สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ 
ระบุ Version ของ Excel 
โปรดทราบ - กรุณาอ่านกฎการใช้บอร์ด (Forum rules) ในตำแหน่งด้านบนของแต่ละบอร์ด
- การสมัครสมาชิก การ Login การกู้คืนรหัสผ่าน
- สมัครสมาชิกดูขั้นตอนได้ที่ สมัครสมาชิก
- Login เข้าระบบโดยคลิกปุ่ม Login ตรงมุมขวาบนของหน้านี้
- การ Login ผ่าน Facebook ดูวิธีที่ Login ผ่าน Facebook
- ลืมรหัสผ่านสามารถรับรหัสใหม่ได้ที่ Reset รหัสผ่าน
- สมัครสมาชิกดูขั้นตอนได้ที่
- มีปัญหาการใช้งาน แจ้งผู้ดูแลระบบได้ที่ ติดต่อผู้ดูแลระบบ
- กำหนดการตั้งค่าส่วนตัว เช่นตั้งค่าภาษาเป็นไทยหรืออังกฤษดูได้ที่ ตั้งค่าส่วนตัว
- การตั้งและตอบกระทู้ดูได้ที่ วิธีการตั้งและตอบกระทู้
- การจัดรูปแบบตัวอักษรด้วย bbcode ในช่องแสดงความคิดเห็นดูได้ที่ จัดรูปแบบตัวอักษร
- กำหนดขนาดตัวอักษรใน Browser ดูได้ที่ กำหนดขนาดตัวอักษรใน Browser
Search found 68 matches
- Wed Sep 06, 2023 3:01 pm
- Forum: Excel
- Topic: สอบถามการแสดงข้อมูล ตามเงื่อนไข และsum แถว ครับ
- Replies: 5
- Views: 635
Re: สอบถามการแสดงข้อมูล ตามเงื่อนไข และsum แถว ครับ
เคยมีตัวอย่างแบบนี้อยู่ อ.ควนเคยตอบในPantip เลยนำมาดัดแปลงแก้ไขเล็กน้อย เดียวหาไฟล์ก่อนส่งให้ครับ
- Mon Mar 23, 2020 3:29 pm
- Forum: Excel
- Topic: หาผลรวม Sum จากข้อความในรายการ
- Replies: 4
- Views: 1533
Re: หาผลรวม Sum จากข้อความในรายการ
สุตร l2 =LOOKUP("ฮ",(IF(LEFT(K2,1)=LEFT($F$18:$F$20,1),$F$18:$F$20)))
Ctrl+Shift+Enter
copy ลงมา
H18 =SUMIF($L$2:$L$16,$F18,$G$2:$G$16)
copy ลงมา ถึง H20
Ctrl+Shift+Enter
copy ลงมา
H18 =SUMIF($L$2:$L$16,$F18,$G$2:$G$16)
copy ลงมา ถึง H20
- Mon Mar 23, 2020 2:40 pm
- Forum: Excel
- Topic: หาผลรวม Sum จากข้อความในรายการ
- Replies: 4
- Views: 1533
Re: หาผลรวม Sum จากข้อความในรายการ
1.ข้อความใน Data ไม่ควรมีข้อความว่างมาบน
2.สามารถเพิ่มคอลัมท์ L ได้หรือไม่ เพื่อจะให้ค้นหา ข้อความ ปฏิบัติการสินเชื่อ,MCP,ระบบบริหารเงินเพื่อธุรกิจ
3.เมือได้สามารถใช้สูตร Sumif ได้
2.สามารถเพิ่มคอลัมท์ L ได้หรือไม่ เพื่อจะให้ค้นหา ข้อความ ปฏิบัติการสินเชื่อ,MCP,ระบบบริหารเงินเพื่อธุรกิจ
3.เมือได้สามารถใช้สูตร Sumif ได้
- Mon Mar 16, 2020 10:43 am
- Forum: Excel
- Topic: สั่งพิมพ์เอกสารไม่ได้
- Replies: 4
- Views: 2878
Re: สั่งพิมพ์เอกสารไม่ได้
แก้สูตร ชีตบ้านปูม้า เซล D2 ใส่ IFERROR เพิ่มเข้าไป
=IFERROR(IF(B2="","",INDEX(ปริ้นสิ้นเดือน!$T$10:$T$30,MATCH(บ้านปูม้า!B2,ปริ้นสิ้นเดือน!$S$10:$S$30,0))),"")
ชีต Bill เซล w3 แก้เป็น IFERROR(IF(U3="","",INDEX(ปริ้นสิ้นเดือน!$T$10:$T$30,MATCH(Bill!U3,ปริ้นสิ้นเดือน!$S$10:$S$30,0))),"")
=IFERROR(IF(B2="","",INDEX(ปริ้นสิ้นเดือน!$T$10:$T$30,MATCH(บ้านปูม้า!B2,ปริ้นสิ้นเดือน!$S$10:$S$30,0))),"")
ชีต Bill เซล w3 แก้เป็น IFERROR(IF(U3="","",INDEX(ปริ้นสิ้นเดือน!$T$10:$T$30,MATCH(Bill!U3,ปริ้นสิ้นเดือน!$S$10:$S$30,0))),"")
- Thu Mar 12, 2020 12:41 pm
- Forum: Excel
- Topic: พอจะมีวิธีใส่ข้อความข้างหน้าให้กับทุกบรรทัดแบบเร็วๆไหมครับ (มีรูปอธิบายประกอบครับ)
- Replies: 5
- Views: 2925
- Thu Mar 12, 2020 9:46 am
- Forum: Excel
- Topic: พอจะมีวิธีใส่ข้อความข้างหน้าให้กับทุกบรรทัดแบบเร็วๆไหมครับ (มีรูปอธิบายประกอบครับ)
- Replies: 5
- Views: 2925
Re: พอจะมีวิธีใส่ข้อความข้างหน้าให้กับทุกบรรทัดแบบเร็วๆไหมครับ (มีรูปอธิบายประกอบครับ)
ใช้ เครื่องมือใน Develope => Insert เลือก Check Box แล้ว คลิกขวา เลือก Format Control => Control => Cell link: เลือก Cell ที่จะแสดง True ,False ใช้ If กำหนดเงื่อนไข TRUE เช่น =If(B4=True,"<br>","")
- Fri Dec 20, 2019 12:11 pm
- Forum: Distribution
- Topic: แจกไฟล์ค้นหารหัสไปรษณีย์
- Replies: 5
- Views: 8326
Re: แจกไฟล์ค้นหารหัสไปรษณีย์
ขอบคุณครับ
อันเป็น ฐานข้อมูลอย่างเดี่ยวครับ
อันเป็น ฐานข้อมูลอย่างเดี่ยวครับ
- Wed Dec 18, 2019 7:20 pm
- Forum: Excel
- Topic: ขออนุญาตสอบถามสูตรการแทนที่ครับ
- Replies: 5
- Views: 909
Re: ขออนุญาตสอบถามสูตรการแทนที่ครับ
ข้อมูล ในคอลัมท์ A
=REPLACE(A1,SEARCH({"789"},A1&"0123456789"),3,"")
ข้อมูล ในคอลัมท์ B
=IFERROR(REPLACE(B1,SEARCH({"77"},B1&"0123456789"),2,""),"")
ถ้าข้อมูลอยู่ในคอลัมท์ A คอลัมท์เดี่ยว
=IF(LEFT(A1,3)="789",REPLACE(A1,SEARCH({"789"},A1&"0123456789"),3,""),IF(LEFT(A1,2)="77",REPLACE(A1,SEARCH({"77 ...
=REPLACE(A1,SEARCH({"789"},A1&"0123456789"),3,"")
ข้อมูล ในคอลัมท์ B
=IFERROR(REPLACE(B1,SEARCH({"77"},B1&"0123456789"),2,""),"")
ถ้าข้อมูลอยู่ในคอลัมท์ A คอลัมท์เดี่ยว
=IF(LEFT(A1,3)="789",REPLACE(A1,SEARCH({"789"},A1&"0123456789"),3,""),IF(LEFT(A1,2)="77",REPLACE(A1,SEARCH({"77 ...
- Sat Dec 14, 2019 4:25 pm
- Forum: Distribution
- Topic: แจกไฟล์ค้นหารหัสไปรษณีย์
- Replies: 5
- Views: 8326
Re: แจกไฟล์ค้นหารหัสไปรษณีย์
อีกไฟล์ครับ แก้รหัสไปรษณีใหม่ครับ ไฟล์ใหญ่ไปขอ ลิงค์นี้ครับ https://www.dropbox.com/s/38qhaidn80lpx ... .xlsm?dl=0
- Wed Dec 04, 2019 5:54 pm
- Forum: Excel
- Topic: ต้องการวิธีสร้าง Drop down list จังหวัด อำเภอ ตำบล
- Replies: 8
- Views: 4443
Re: ต้องการวิธีสร้าง Drop down list จังหวัด อำเภอ ตำบล
ผมดูรหัสไปรษณีย์ ไม่ตรงเท่าไร เลยข้ออนุญาติแก้ฐานข้อมูลให้ใหม่ นะครับ กลับ
https://www.noplink.com/postcode_seek.p ... 2%E0%B9%8C
https://www.noplink.com/postcode_seek.p ... 2%E0%B9%8C
- Wed Dec 04, 2019 2:25 pm
- Forum: Distribution
- Topic: แจกไฟล์ ตารางแข่งขันฟุตบอลโลก โซนเอเชีย รอบที่2
- Replies: 1
- Views: 4683
แจกไฟล์ ตารางแข่งขันฟุตบอลโลก โซนเอเชีย รอบที่2
ตารางแข่งขันฟุตบอลโลก โซนเอเชีย รอบที่2 พร้อมผล แบ่งตามกลุ่ม A - H ครับ ซึ่งจะแข่งขันอีกในปีหน้า 2563 วันที่26/3/2563 ครับ
- Wed Dec 04, 2019 1:53 pm
- Forum: Distribution
- Topic: แจกไฟล์ค้นหารหัสไปรษณีย์
- Replies: 5
- Views: 8326
- Wed Nov 27, 2019 1:11 pm
- Forum: Excel
- Topic: Macro : ต้องการใส่ ว/ด/ป เกิด แล้วให้คำนวณในช่อง Age เลย
- Replies: 2
- Views: 586
Re: Macro : ต้องการใส่ ว/ด/ป เกิด แล้วให้คำนวณในช่อง Age เลย
ลองดูครับ ตามไฟล์แนบ
- Wed Nov 13, 2019 11:20 am
- Forum: Excel
- Topic: ต้องการเคลียร์ค่าหลังจากที่กด clear > Getdata
- Replies: 12
- Views: 1667
Re: ต้องการเคลียร์ค่าหลังจากที่กด clear > Getdata
Private Sub Newform_Click()
'Clear the data
Dim ctl As Control
For Each ctl In Me.Controls
Select Case TypeName(ctl)
Case "TextBox"
ctl.Text = ""
Case "ComboBox"
ctl.Value = ""
End Select
Next ctl
Sheets("Forms").Range("A2:F4,A6:F8").ClearContents
End Sub
'Clear the data
Dim ctl As Control
For Each ctl In Me.Controls
Select Case TypeName(ctl)
Case "TextBox"
ctl.Text = ""
Case "ComboBox"
ctl.Value = ""
End Select
Next ctl
Sheets("Forms").Range("A2:F4,A6:F8").ClearContents
End Sub
- Tue Oct 01, 2019 1:54 pm
- Forum: Excel
- Topic: รบกวนสอบถามVBAการโชว์HeadColumnในหน้าListboxครับ
- Replies: 15
- Views: 3152
Re: รบกวนสอบถามVBAการโชว์HeadColumnในหน้าListboxครับ
ก็Cusโค๊ตส่วนนี้ไป ต่อ ส่วนที่ Listbox.Clear
Code: Select all
Me.ListBox1.Clear
Me.ListBox1.AddItem
For x = 1 To 6
Me.ListBox1.List(0, x - 1) = Sheet1.Cells(1, x)
Next x
Me.ListBox1.Selected(0) = True- Thu Sep 26, 2019 1:08 pm
- Forum: Excel
- Topic: รบกวนสอบถามVBAการโชว์HeadColumnในหน้าListboxครับ
- Replies: 15
- Views: 3152
Re: รบกวนสอบถามVBAการโชว์HeadColumnในหน้าListboxครับ
Code: Select all
Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 6
Me.ListBox1.AddItem
For x = 1 To 6
Me.ListBox1.List(0, x - 1) = Sheet1.Cells(1, x)
Next x
Me.ListBox1.Selected(0) = True
End Sub
- Mon Jul 01, 2019 5:53 pm
- Forum: Excel
- Topic: เอาข้อมูล แขวง เขต มารวมกัน
- Replies: 2
- Views: 737
Re: เอาข้อมูล แขวง เขต มารวมกัน
=CONCATENATE(M2," ",N2)
- Tue Jun 25, 2019 3:20 pm
- Forum: Excel
- Topic: ดึงรูปข้าม Sheet
- Replies: 8
- Views: 4120
Re: ดึงรูปข้าม Sheet
แก้
PicTable =OFFSET(Picture!$B$2,0,0,COUNTA(PicID),1)
PicID=OFFSET(Picture!$A$2,0,0,COUNTA(Picture!$A:$A)-1,1)
Selected=EmpReport!$I$2
ผมว่าไม่ควรเอาข้อมูลในองกรค์มาแสดงควรยกตัวอย่างอื่นข้อมูลมาก็ได้ ครับ
PicTable =OFFSET(Picture!$B$2,0,0,COUNTA(PicID),1)
PicID=OFFSET(Picture!$A$2,0,0,COUNTA(Picture!$A:$A)-1,1)
Selected=EmpReport!$I$2
ผมว่าไม่ควรเอาข้อมูลในองกรค์มาแสดงควรยกตัวอย่างอื่นข้อมูลมาก็ได้ ครับ
- Sun Jun 23, 2019 7:06 pm
- Forum: Excel
- Topic: ขอสูตรการคิดจำนวนเดือน จำนวนปีแยกคอมลัมน์เพื่อคำนวณค่าเสื่อมราคาสินทรัพย์
- Replies: 17
- Views: 7182
- Sun Jun 23, 2019 7:01 pm
- Forum: Excel
- Topic: ขอสูตรการคิดจำนวนเดือน จำนวนปีแยกคอมลัมน์เพื่อคำนวณค่าเสื่อมราคาสินทรัพย์
- Replies: 17
- Views: 7182
Re: ขอสูตรการคิดจำนวนเดือน จำนวนปีแยกคอมลัมน์เพื่อคำนวณค่าเสื่อมราคาสินทรัพย์
แนะนำให้สูตรโดยตรงทางการเงิน ในExcel จะมีฟังก์ชันนี้อยู่ เช่น DB,DDB,SLN,SYD,VDB คนที่เรียนด้านการเงินจะรู้วิธธีค่าเสื่อมราคา
DB= หาค่าเสื่อมราคาของสินทรัพย์สำหรับคาบเวลาที่ระบุโดยใช้ช่วงเวลาลดลงแน่นอน
DDB = หาค่าเสื่อมราคาของสินทรัพย์สำหรับช่วงเวลาที่ระบุเอง
SLN =หาค่าเสื่อมราคาแบบเส้นตรงของสินทร ...
DB= หาค่าเสื่อมราคาของสินทรัพย์สำหรับคาบเวลาที่ระบุโดยใช้ช่วงเวลาลดลงแน่นอน
DDB = หาค่าเสื่อมราคาของสินทรัพย์สำหรับช่วงเวลาที่ระบุเอง
SLN =หาค่าเสื่อมราคาแบบเส้นตรงของสินทร ...