:D snasui.com ยินดีต้อนรับ :D
ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย :thup: สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ :arrow: ระบุ Version ของ Excel
:!: โปรดทราบ :!:
  1. กรุณาอ่านกฎการใช้บอร์ด (Forum rules) ในตำแหน่งด้านบนของแต่ละบอร์ด
  2. การสมัครสมาชิก การ Login การกู้คืนรหัสผ่าน
    1. สมัครสมาชิกดูขั้นตอนได้ที่ :arrow: สมัครสมาชิก
    2. Login เข้าระบบโดยคลิกปุ่ม Login ตรงมุมขวาบนของหน้านี้ :roll:
    3. การ Login ผ่าน Facebook ดูวิธีที่ :arrow: Login ผ่าน Facebook
    4. ลืมรหัสผ่านสามารถรับรหัสใหม่ได้ที่ :arrow: Reset รหัสผ่าน
  3. มีปัญหาการใช้งาน แจ้งผู้ดูแลระบบได้ที่ :arrow: ติดต่อผู้ดูแลระบบ
  4. กำหนดการตั้งค่าส่วนตัว เช่นตั้งค่าภาษาเป็นไทยหรืออังกฤษดูได้ที่ :arrow: ตั้งค่าส่วนตัว
  5. การตั้งและตอบกระทู้ดูได้ที่ :arrow: วิธีการตั้งและตอบกระทู้
  6. การจัดรูปแบบตัวอักษรด้วย bbcode ในช่องแสดงความคิดเห็นดูได้ที่ :arrow: จัดรูปแบบตัวอักษร
  7. กำหนดขนาดตัวอักษรใน Browser ดูได้ที่ :arrow: กำหนดขนาดตัวอักษรใน Browser

Search found 30743 matches

by snasui
Tue Jan 16, 2024 10:34 am
Forum: Excel
Topic: VBA รวมไฟล์ PDF เฉพาะที่กำหนด
Replies: 14
Views: 666

Re: VBA รวมไฟล์ PDF เฉพาะที่กำหนด

:D แก้การประกาศตัวแปรจาก Dim Select_Files As Variant เป็น Dim Select_Files() As Variant ครับ
by snasui
Tue Jan 16, 2024 6:10 am
Forum: Excel
Topic: VBA รวมไฟล์ PDF เฉพาะที่กำหนด
Replies: 14
Views: 666

Re: VBA รวมไฟล์ PDF เฉพาะที่กำหนด

:D ตัวอย่างการปรับ Code ครับ 'Other code Dim i As Integer Set Acro_App = New Acrobat.AcroApp Set Acro_DestDoc = New Acrobat.AcroPDDoc Set Acro_TargDoc = New Acrobat.AcroPDDoc For cntr = 2 To Sheet1.Cells(Sheet1.Rows.Count, "a").End(xlUp).Row If Sheet1.Range("b" & cntr).Value ...
by snasui
Sun Jan 14, 2024 5:27 pm
Forum: Excel
Topic: ขออนุญาตสอบถามการเปลี่ยนชื่อ workbook ด้วย VBA
Replies: 2
Views: 149

Re: ขออนุญาตสอบถามการเปลี่ยนชื่อ workbook ด้วย VBA

:D ยังไม่ค่อยเข้าใจสิ่งที่ต้องการจะทำสักเท่าไรครับ จาก Statement ActiveWorkbook.SaveAs Filename:=path & wksht.Range("A3").Value & ".xlsx" ตัวแปร wksht คือชีตที่ชื่อว่า name ของไฟล์ copymoney.xlsm ซึ่งเซลล์ A3 เป็นค่าว่างเปล่า ไม่สามารถนำไปเป็นชื่อไฟล์ได้ นอกจากนี้ระหว่างช...
by snasui
Sat Jan 13, 2024 12:43 pm
Forum: Other
Topic: google form สามาารถ Vlookup ข้อมูลจาก google Sheet ได้หรือไม่
Replies: 8
Views: 1400

Re: google form สามาารถ Vlookup ข้อมูลจาก google Sheet ได้หรือไม่

:D เข้าใจถูกแล้วครับ เพราะไฟล์นั้นเป็นการจัดการโดย Google Form โดยปกติเราไม่สามารถไปบังคับให้มันทำงานได้ตรงกับสิ่งที่เราต้องการดังที่เห็นแล้วว่าถ้ามีสูตรมันจะเขียนข้อมูลในบรรทัดว่างถัดไปที่เรายังไม่เขียนสูตร แสดงว่ามันจะเริ่มวางข้อมูลในบรรทัดที่ว่างเสมอ เมื่อเป็นเช่นนี้ย่อมไม่ตรงกับสิ่งที่ต้องการจะน...
by snasui
Sat Jan 13, 2024 12:37 pm
Forum: Excel
Topic: บันทึกข้อมูลข้าม Sheet ด้วย VBA
Replies: 10
Views: 916

Re: บันทึกข้อมูลข้าม Sheet ด้วย VBA

:D ลองปรับมาเองก่อนตามกฎการใช้บอร์ดข้อ 5 ด้านบน :roll: ปรับได้เท่าไรก็เท่านั้น ติดตรงไหนค่อยถามกันต่อครับ
by snasui
Fri Jan 12, 2024 11:00 am
Forum: Other
Topic: google form สามาารถ Vlookup ข้อมูลจาก google Sheet ได้หรือไม่
Replies: 8
Views: 1400

Re: google form สามาารถ Vlookup ข้อมูลจาก google Sheet ได้หรือไม่

:D วิธีการที่น่าจะช่วยได้คือดึงข้อมูลจาก Google Sheet ที่ได้จาก Google Form ไปไว้ใน Google Sheet อีกไฟล์แล้วค่อยไป Vlookup จากไฟล์นั้นแทนครับ
by snasui
Thu Jan 11, 2024 2:38 pm
Forum: Other
Topic: google form สามาารถ Vlookup ข้อมูลจาก google Sheet ได้หรือไม่
Replies: 8
Views: 1400

Re: google form สามาารถ Vlookup ข้อมูลจาก google Sheet ได้หรือไม่

:D Google Form จะมี Google Sheet ที่ถูกสร้างขึ้นมาคู่กันเพื่อใช้แสดงข้อมูลที่ได้จากการ Submit Form ดังนั้นเราสามารถเขียนสูตรที่ปลายทางเพื่อนำค่าที่ได้นี้ไปใช้ต่อได้ตามต้องการครับ
by snasui
Fri Jan 05, 2024 8:12 am
Forum: Excel
Topic: สูตรสำหรับการจัดทำตารางนับสต็อกสินค้าครับ
Replies: 1
Views: 181

Re: สูตรสำหรับการจัดทำตารางนับสต็อกสินค้าครับ

:D งานลักษณะที่แจ้งมานั้นเข้าใจว่าเป็นการเขียนโปรแกรมด้วย VBA เข้าไปช่วย ยกตัวอย่างเช่น เมื่อคีย์ข้อมูลในชีตที่ 1 แล้วคลิกปุ่มเพื่อเก็บข้อมูลเข้าชีต 3 ส่วนชีต 2 ดูเร็ว ๆ แล้วใช้สูตรเข้ามาช่วยได้ สำหรับการเขียนโปรแกรมจำเป็นต้องเขียนมาเองก่อนตามกฎการใช้บอร์ดข้อ 5 ด้านบน :roll: ติดตรงไหนค่อยถามกันต่อครับ
by snasui
Wed Dec 27, 2023 6:44 am
Forum: Excel
Topic: ขอความอนุเคาะห์สูตรนำค่าจากแนวนอนไปแนวตั้งครับ
Replies: 10
Views: 565

Re: ขอความอนุเคาะห์สูตรนำค่าจากแนวนอนไปแนวตั้งครับ

:D ตัวอย่างสูตรตามด้านล่างครับ ที่ A2 คีย์ =IFERROR(LEFT(INDEX(input!$A$1:$A$11,INT((ROWS(C$1:C1)-1)/40)+1),5),"") Enter > Copy ลงด้านล่าง ที่ B2 คีย์ =IF(A2="","",MID(INDEX(input!$A$1:$A$11,MATCH(A2&"*",input!$A$1:$A$11,0)),MOD((ROWS(C$1:C1)-1),40)+7,1)) ...
by snasui
Tue Dec 26, 2023 3:47 pm
Forum: Excel
Topic: สูตรในการคำนวณวัน ที่เหลือของเดือน
Replies: 2
Views: 199

Re: สูตรในการคำนวณวัน ที่เหลือของเดือน

:D ช่วยแจ้ง Version ของ Excel ที่ใช้อยู่จริงตาม Link นี้ด้วยครับ https://snasui.com/viewtopic.php?p=103177#p103177

สำหรับตัวอย่างสูตรเพื่อหาว่าอีกกี่วันสิ้นเดือนตามด้านล่างครับ

=EOMONTH(TODAY(),0)-TODAY()+1
by snasui
Mon Dec 11, 2023 8:09 pm
Forum: Excel
Topic: ตารางในช่องหายไป
Replies: 1
Views: 120

Re: ตารางในช่องหายไป

:D น่าจะเกิดจากการย่อหน้าต่างแล้วทำให้หลุดจาก Windows ออกไป ลองใช้วิธีการเรียงหน้าต่างตามด้านล่างครับ
  1. กดแป้น Ctrl+N เพื่อเปิดไฟล์ว่างขึ้นมาใหม่
  2. เข้าเมนู View เลือก Arrange All
  3. เลือก Vertical หรือ Horizontal เพื่อให้หน้าที่หลุดขอบ Windows มาแสดงเรียงด้วยกันกับไฟล์ที่ได้ตามข้อ 1
by snasui
Mon Dec 11, 2023 9:38 am
Forum: Excel
Topic: อยากได้โค๊ด VBA นำเข้าข้อความจาก Microsoft Word แบบหลาย ๆ ไฟล์มาลงใน Excel
Replies: 5
Views: 371

Re: อยากได้โค๊ด VBA นำเข้าข้อความจาก Microsoft Word แบบหลาย ๆ ไฟล์มาลงใน Excel

:D ทำการกำหนดค่าตั้งต้นให้กับ j ใหม่ในแต่ละไฟล์ที่ Loop ครับ ตัวอย่างการปรับ Code 'Other code a = VBA.Split(Contents, Chr(7)) j = 0 For i = 0 To UBound(a) 'Other code ผมรบกวนแปะเลขที่บัญชีไว้ให้ผมด้วยครับมีค่ากาแฟให้ ขอบคุณสำหรับน้ำใจครับ :thup: การตอบในฟอรัมยินดีช่วยเหลือสมาชิกเพื่อการช่วยเหลือเผื่...
by snasui
Sun Dec 10, 2023 7:49 am
Forum: Excel
Topic: อยากได้โค๊ด VBA นำเข้าข้อความจาก Microsoft Word แบบหลาย ๆ ไฟล์มาลงใน Excel
Replies: 5
Views: 371

Re: อยากได้โค๊ด VBA นำเข้าข้อความจาก Microsoft Word แบบหลาย ๆ ไฟล์มาลงใน Excel

:D ตัวอย่างการปรับ Code ครับ Option Explicit Sub ImportDOCX() Dim FName As String, FullName As String Dim wdApp As Object 'Word.Application Dim wdDoc As Object 'Word.Document Dim Coordinates As String, Contents As String Dim Dest As Range, a As Variant, i As Integer, j As Integer 'Prepare Set Dest =...
by snasui
Sun Dec 03, 2023 8:07 am
Forum: Excel
Topic: ต้องการได้ผลลัพธ์ที่ไวขึ้นโดยไม่ใช้ Loop หรือถ้าใช้ต้องปรับอย่างไรให้ได้ผลลัพธ์ที่ไวขึ้น
Replies: 2
Views: 208

Re: ต้องการได้ผลลัพธ์ที่ไวขึ้นโดยไม่ใช้ Loop หรือถ้าใช้ต้องปรับอย่างไรให้ได้ผลลัพธ์ที่ไวขึ้น

:D ตัวอย่างการปรับ Code ครับ Sub CopyCDataToNextColumn() Dim ws As Worksheet Dim lastRow As Long Dim i As Long Dim value As String Dim data As Variant Set ws = ThisWorkbook.Sheets("Sheet1") With ws lastRow = .Cells(.Rows.Count, 1).End(xlUp).Row data = .Range(.Cells(1, 1), .Cells(lastRow, 1...
by snasui
Sat Dec 02, 2023 8:08 am
Forum: Excel
Topic: ดึงข้อมูลข้ามชีท โดยดึงข้อมูลคอลัมม์เดียวกันหลายค่าไม่ได้เพราะสูตรผิด
Replies: 8
Views: 508

Re: ดึงข้อมูลข้ามชีท โดยดึงข้อมูลคอลัมม์เดียวกันหลายค่าไม่ได้เพราะสูตรผิด

:D กรุณาทำตัวอย่างคำตอบที่ถูกต้องมาด้วยจะได้สะดวกในการปรับปรุงสูตรของเพื่อนสมาชิกครับ
by snasui
Sat Dec 02, 2023 8:02 am
Forum: Excel
Topic: แยกข้อมูลตามเงื่อนไข
Replies: 3
Views: 295

Re: แยกข้อมูลตามเงื่อนไข

:D ตัวอย่างสูตรครับ

เซลล์ I4 คีย์

=COUNTIFS($B$4:$B$13,$H4,$C$4:$C$13,RIGHT(I$3),$A$4:$A$13,$G4)

Enter > Copy ไปทางขวาถึง K4 แล้ว Copy ลงด้านล่าง
by snasui
Fri Dec 01, 2023 5:47 am
Forum: Excel
Topic: แยกข้อมูลตามเงื่อนไข
Replies: 3
Views: 295

Re: แยกข้อมูลตามเงื่อนไข

:D กรุณาอธิบายว่าตัวเลขผลลัพธ์แต่ละช่องมีวิธีคำนวณมาอย่างไร เพื่อนสมาชิกจะได้ช่วยเหลือได้ครับ
by snasui
Wed Nov 29, 2023 6:59 pm
Forum: Excel
Topic: ตั้งค่าส่งรายงานไปที่อีเมล์
Replies: 3
Views: 253

Re: ตั้งค่าส่งรายงานไปที่อีเมล์

:D กรุณาเขียน Code มาในไฟล์ Excel แล้วแนบไฟล์นั้นมาใหม่ อ่านกฎการใช้บอร์ดข้อ 4 และ 5 ด้านบนประกอบครับ :roll:
by snasui
Sun Nov 26, 2023 4:43 pm
Forum: Excel
Topic: มีปัญหาการใช้ form กับ Listฺbox มาจาก Sheet เพื่อค้นหาข้อมูลและส่งข้อมูลไปวางที่ Sheet อื่น
Replies: 9
Views: 457

Re: มีปัญหาการใช้ form กับ Listฺbox มาจาก Sheet เพื่อค้นหาข้อมูลและส่งข้อมูลไปวางที่ Sheet อื่น

พวกที่เป็น LastRow ShRow ListRow FindRow หรือ ColHead เป็นตัวแปรหรือไม่ และต้องประกาศตัวแปรหรือเปล่า :D คำเหล่านั้นเป็นตัวแปรทั้งนั้นครับ ตัวแปรควรจะมีการประกาศเอาไว้ก่อนเสมอ เป็นการจัดสรร Memory ให้เหมาะสมกับประเภทของข้อมูล ทั้งจะได้ติดตาม แก้ไข เปลี่ยนแปลง ได้โดยง่าย การไม่ประกาศตัวแปรจะทำให้ชนิด...