: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 3693 matches

by puriwutpokin
Tue Jan 02, 2024 6:43 pm
Forum: Excel
Topic: ขอวิธีจัดเรียงข้อมูลแบบมีเงื่อนไขครับ
Replies: 9
Views: 384

Re: ขอวิธีจัดเรียงข้อมูลแบบมีเงื่อนไขครับ

น่าจะเป็นเพราะเวอร์ชั่น Excel
ปรับเป็น D8=IFERROR(VLOOKUP($C8,ต้นฉบับ!$C$8:$K$113,COLUMNS($C$8:D$8),0),"")
by puriwutpokin
Tue Jan 02, 2024 6:32 pm
Forum: Excel
Topic: เก็บยอดขาย รายวัน แยกชีท ด้วย VBA
Replies: 5
Views: 282

Re: เก็บยอดขาย รายวัน แยกชีท ด้วย VBA

แนบไฟล์ล่าสุดที่มีการใส่โค้ดและข้อมูลที่ว่าไม่มา มาดูครับ
by puriwutpokin
Tue Jan 02, 2024 6:31 pm
Forum: Excel
Topic: ขอวิธีจัดเรียงข้อมูลแบบมีเงื่อนไขครับ
Replies: 9
Views: 384

Re: ขอวิธีจัดเรียงข้อมูลแบบมีเงื่อนไขครับ

C8=IFERROR(INDEX(ต้นฉบับ!O$8:O$113,MATCH(ROWS(C$8:C8),ต้นฉบับ!$N$8:$N$113,0)),"") Copy down
D8=XLOOKUP($C8,ต้นฉบับ!$C$8:$C$113,ต้นฉบับ!D$8:D$113,"") Copy right and down
by puriwutpokin
Tue Jan 02, 2024 6:07 pm
Forum: Excel
Topic: เก็บยอดขาย รายวัน แยกชีท ด้วย VBA
Replies: 5
Views: 282

Re: เก็บยอดขาย รายวัน แยกชีท ด้วย VBA

ลองปรับตามนี้ดูครับ Sub Macro1() Dim x As Integer Sheets("Data").Visible = True x = Application.Match(Sheets("วันที่").Range("a1"), Sheets("ยอดขาย").Range("a3:k3"), 0) Sheets("Data").Range("F4:F13").Copy Sheets("ยอดขาย")...
by puriwutpokin
Tue Jan 02, 2024 5:39 pm
Forum: Excel
Topic: เก็บยอดขาย รายวัน แยกชีท ด้วย VBA
Replies: 5
Views: 282

Re: เก็บยอดขาย รายวัน แยกชีท ด้วย VBA

ที่ชีทData วันที่และข้อมูล ไม่มีครับมีแต่ข้อมูลชุดเดียวไม่มีการอ้างถึงวันที่ ลองทำข้อมูลตัวอย่างมาอีกที่ครับจะได้เข้าใจตรงกันครับ
by puriwutpokin
Tue Jan 02, 2024 5:34 pm
Forum: Excel
Topic: ขอวิธีจัดเรียงข้อมูลแบบมีเงื่อนไขครับ
Replies: 9
Views: 384

Re: ขอวิธีจัดเรียงข้อมูลแบบมีเงื่อนไขครับ

คำตอบที่ต้องการเป็นแบบไหนครับที่ว่ามีเงื่อนไข ลองทำตัวอย่างคำตามมาดูด้วยครับจะได้เข้าใจตรงกันครับ
by puriwutpokin
Wed Dec 27, 2023 8:21 pm
Forum: Excel
Topic: ขอความอนุเคาะห์สูตรนำค่าจากแนวนอนไปแนวตั้งครับ
Replies: 10
Views: 565

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

เดาว่าน่าจะต้องการแบบนี้หรือเปล่าครับ
B2=IFERROR(LEFT(INDEX(input!$A$1:$A$11,ROWS(C$1:C1)),5),"") Copy Down
C2=IF($B2="","",MID(INDEX(input!$A$1:$A$11,MATCH($B2&"*",input!$A$1:$A$11,0)),C$1+6,1)+0) Copy right and down
by puriwutpokin
Wed Dec 27, 2023 1:55 pm
Forum: Excel
Topic: ขอความอนุเคาะห์สูตรนำค่าจากแนวนอนไปแนวตั้งครับ
Replies: 10
Views: 565

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

ajsudkedt wrote: Wed Dec 27, 2023 1:11 pm
puriwutpokin wrote: Wed Dec 27, 2023 9:59 am ลองดูครับที่
B2=UNIQUE(answer_key!A2:A999&"")
C2=INDEX(answer_key!$B$2:$B$999,MATCH($B2,answer_key!$A$2:$A$999,0)+COLUMNS($C$2:C2)-1) copy right and down
ใส่สูตรแล้ว มี error ตามไฟล์ ask2 ที่แนบ ครับ
สูตรไม่ใช่ที่แจ้งไปนะครับ ดูที่ไฟล์แนบครับ
by puriwutpokin
Wed Dec 27, 2023 9:59 am
Forum: Excel
Topic: ขอความอนุเคาะห์สูตรนำค่าจากแนวนอนไปแนวตั้งครับ
Replies: 10
Views: 565

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

ลองดูครับที่
B2=UNIQUE(answer_key!A2:A999&"")
C2=INDEX(answer_key!$B$2:$B$999,MATCH($B2,answer_key!$A$2:$A$999,0)+COLUMNS($C$2:C2)-1) copy right and down
by puriwutpokin
Fri Dec 22, 2023 11:43 am
Forum: Excel
Topic: วิธีทำให้ได้ข้อมูล Array เหมือน FILTER
Replies: 2
Views: 230

Re: วิธีทำให้ได้ข้อมูล Array เหมือน FILTER

D1=IFERROR(INDEX(A:A,AGGREGATE(15,6,ROW($A$1:$A$20)/($A$1:$A$20>10),ROW($A$1:$A$20))),"")
by puriwutpokin
Wed Dec 20, 2023 5:27 pm
Forum: Excel
Topic: สอบถามสูตรการดึงข้อมูลจากหลาย Sheet
Replies: 2
Views: 193

Re: สอบถามสูตรการดึงข้อมูลจากหลาย Sheet

E3=IFERROR(VLOOKUP($A3,INDIRECT("'ทดสอบ"&LOOKUP(99,$E$1:E$1)&"'!A1:F99"),MOD((COLUMNS($E3:E3)-1),2)+5,0),0) copy right and down
by puriwutpokin
Mon Dec 18, 2023 1:10 pm
Forum: Excel
Topic: Code VB ส่งออก Sheet เป็น PDF หลายหน้า ตามที่เลือก ต้องปรับ อย่างไรครับ
Replies: 1
Views: 150

Re: Code VB ส่งออก Sheet เป็น PDF หลายหน้า ตามที่เลือก ต้องปรับ อย่างไรครับ

ปรับตามนี้ครับ ActiveWorkbook.ExportAsFixedFormat xlTypePDF, From:=1, To:=5, Filename:=sFolderPath & "\" & FName เปลี่ยนเป็น ThisWorkbook.Sheets(Array("Sheet1", "Sheet4", "Sheet5")).Select ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=sFol...
by puriwutpokin
Fri Dec 15, 2023 5:16 pm
Forum: Excel
Topic: ต้องแสดงยอดคงเหลือและได้รับจากการเบิกเงิน
Replies: 3
Views: 230

Re: ต้องแสดงยอดคงเหลือและได้รับจากการเบิกเงิน

ปรับที่ G4=MAX(IF(SUMIFS(F$4:F4,B$4:B4,B4,C$4:C4,C4)<3600,F4,F4+3600-SUMIFS(F$4:F4,B$4:B4,B4,C$4:C4,C4)),0)
by puriwutpokin
Fri Dec 15, 2023 2:15 pm
Forum: Excel
Topic: ต้องแสดงยอดคงเหลือและได้รับจากการเบิกเงิน
Replies: 3
Views: 230

Re: ต้องแสดงยอดคงเหลือและได้รับจากการเบิกเงิน

แบบนี้หรือเปล่าครับ
ไม่ค่อยเข้าใจคำถาม
H3=MAX(3600-SUMIFS(G$4:G4,C$4:C4,C4),0) Copy Down
by puriwutpokin
Thu Dec 14, 2023 11:38 am
Forum: Excel
Topic: เปรียบเทียบค่าในแถวให้เท่ากัน แล้ววางข้อมูล
Replies: 2
Views: 191

Re: เปรียบเทียบค่าในแถวให้เท่ากัน แล้ววางข้อมูล

ปรับจาก

Code: Select all

    ActiveCell.Offset(f2, 3).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
เป็น

Code: Select all

    Cells(i + 6, 9).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False