: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

สูตรหาวันที่ในเดือน

ฟอรัมถาม-ตอบปัญหาการใช้งาน MS Excel and VBA
Forum rules
  1. ไม่อนุญาตให้ใช้ภาษาแชทในการถามและตอบปัญหา ไม่ใช้คำว่า "คับ" หรือ "อ่ะครับ" แทนคำว่า "ครับ" ไม่ใช้คำว่า "เด๋ว" แทนคำว่า "เดี๋ยว" เป็นต้น เนื่องจากเมื่อแปลเป็นภาษาต่างประเทศแล้วจะให้ความหมายผิดไปจากที่ควรจะเป็น
  2. ห้ามถามโดยระบุชื่อผู้ตอบและต้องตั้งชื่อกระทู้ให้สื่อถึงปัญหาที่จะถาม ไม่ตั้งชื่อว่า ช่วยด้วยครับ, มีปัญหามาปรึกษาครับ เป็นต้น
  3. กรุณาอธิบายปัญหาและระบุคำตอบที่ต้องการมาในกระทู้ด้วยเสมอถึงแม้จะอธิบายไว้ในไฟล์แนบแล้วก็ตาม ทั้งนี้เพื่ออำนวยความสะดวกแก่เพื่อนสมาชิกในการค้นหาข้อมูล
  4. กรุณาแนบไฟล์ตัวอย่างพร้อมแสดงคำตอบที่ถูกต้องมาในไฟล์ด้วยเพื่อให้ง่ายต่อการทำความเข้าใจและสะดวกต่อการตอบคำถาม (ขนาดไฟล์ไม่เกิน 500Kb ขนาดภาพไม่เกิน 800*600 Pixel) ไม่แนบเป็น Link มาจากแหล่งอื่นที่อาจจะถูกลบทิ้งไปโดยต้นทางในภายหลัง นอกจากนี้ไม่ควรแนบไฟล์ที่มีข้อมูลสำคัญอันก่อให้เกิดความเสียหายกับตนเองและผู้อื่น
  5. กรณีเป็นคำถามเกี่ยวกับ Programming เช่น VBA, VB.Net, C#, SQL ฯลฯ ต้องลองเขียนมาเองก่อนเสมอ ถามเฉพาะที่ติดปัญหา ระบุ Module, Procedure ที่ติดปัญหาให้ชัดเจน กรุณาโพสต์ Code ให้แสดงเป็น Code คือเปิดด้วย [code] และปิดด้วย [/code] ตัวอย่างเช่น [code]dim r as range[/code] เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่าง)
  6. กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
Post Reply
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

สูตรหาวันที่ในเดือน

#1

Post by วังวู ช่ง »

เรียนทุกท่านครับ ช่วยเขียนสูตรให้หน่อยครับ
ปัญหาคือว่า วันที่ 1/1/2017 ตรงวันพุธครับ แต่วันที 1/2/2017 ตรงวันเสาร์ ถือว่าไม่เอา ให้มาเอาวันที่ 31/1/2017 ตรงวันศุกร์แทนครับ มีสูตรอย่างรัยครับ ตัวที่ทาสีคือตัวที่ต้องอยากได้คำตอบครับ
รบกวนครับ
You do not have the required permissions to view the files attached to this post.
Top
ZEROV
Member
Member
Posts: 73
Joined: Thu Jun 03, 2010 6:31 pm

Re: สูตรหาวันที่ในเดือน

#2

Post by ZEROV »

=DATE(2017,ROWS($A$1:A1),1)-MID(1200000,MOD(DATE(2017,ROWS($A$1:A1),1),7)+1,1)
Top
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

Re: สูตรหาวันที่ในเดือน

#3

Post by วังวู ช่ง »

ตามที่ถามถือว่าใช้ได้แล้วครับ ขอบคุณมากครับ แต่ปัญหาอยู่ที่ว่า ถ้าเปลี่ยนแปลงวัน/เดือน/ปี คำตอบออกมาจะไม่ตรงตามต้องการครับ
ช่วยดูให้อีกครับ
You do not have the required permissions to view the files attached to this post.
Top
ZEROV
Member
Member
Posts: 73
Joined: Thu Jun 03, 2010 6:31 pm

Re: สูตรหาวันที่ในเดือน

#4

Post by ZEROV »

D1=A1*(MOD(A1,7)>1)
คัดลอกสูตรลงไป
สูตรนี้จะเปลียนวันที่ตรงกับเสาร์หรืออาทิตย์ให้เป็น 0

E1=SMALL($D$1:$D$28,ROW(A1)+COUNTIF($D$1:$D$28,0))
คัดลอกสูตรลงไป
Top
ZEROV
Member
Member
Posts: 73
Joined: Thu Jun 03, 2010 6:31 pm

Re: สูตรหาวันที่ในเดือน

#5

Post by ZEROV »

แก้วันที่จากสูตรเดิมก็ได้
=DATE(2017,ROWS($A$1:A1),21)-MID(1200000,MOD(DATE(2017,ROWS($A$1:A1),21),7)+1,1)
Top
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

Re: สูตรหาวันที่ในเดือน

#6

Post by วังวู ช่ง »

ZEROV wrote:D1=A1*(MOD(A1,7)>1)
คัดลอกสูตรลงไป
สูตรนี้จะเปลียนวันที่ตรงกับเสาร์หรืออาทิตย์ให้เป็น 0

E1=SMALL($D$1:$D$28,ROW(A1)+COUNTIF($D$1:$D$28,0))
คัดลอกสูตรลงไป
ขอบคุณมากครับ ใช้ได้ครับ
Top
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

Re: สูตรหาวันที่ในเดือน

#7

Post by วังวู ช่ง »

ZEROV wrote:แก้วันที่จากสูตรเดิมก็ได้
=DATE(2017,ROWS($A$1:A1),21)-MID(1200000,MOD(DATE(2017,ROWS($A$1:A1),21),7)+1,1)
ขอบคุณมากครับได้ตามต้องการครับ
Top
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

Re: สูตรหาวันที่ในเดือน

#8

Post by วังวู ช่ง »

ZEROV wrote:แก้วันที่จากสูตรเดิมก็ได้
=DATE(2017,ROWS($A$1:A1),21)-MID(1200000,MOD(DATE(2017,ROWS($A$1:A1),21),7)+1,1)
รบกวนอีกหน่อยครับ เมื่อเราเปลี่ยนแปลงเดือน จะคำนวนไม่ออกครับ
You do not have the required permissions to view the files attached to this post.
Top
ZEROV
Member
Member
Posts: 73
Joined: Thu Jun 03, 2010 6:31 pm

Re: สูตรหาวันที่ในเดือน

#9

Post by ZEROV »

:roll: กรุณาอธิบายปัญหาให้ชัดเจนด้วยครับ
Top
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

Re: สูตรหาวันที่ในเดือน

#10

Post by วังวู ช่ง »

ZEROV wrote::roll: กรุณาอธิบายปัญหาให้ชัดเจนด้วยครับ
ครับผม ปัญหาอยู่ที่ว่า สูตรที่ท่านเขียนมานี้ ถ้าเป็นวันที่ 21/02/2017 จะออกมาตรงความต้องการครับ แต่ถ้าเปลี่ยนมาเป็น 21/05/2017 หรือ เดือน 3,4,5... ผลออกมาไม่ตรงความต้องการครับ
ความหมายคือว่า เมื่อเราเปลี่ยนแปลงเดือน ผลออกมาไม่ตรงความต้องการครับ
Top
ZEROV
Member
Member
Posts: 73
Joined: Thu Jun 03, 2010 6:31 pm

Re: สูตรหาวันที่ในเดือน

#11

Post by ZEROV »

ตรงไหนไม่ตรงตามที่ต้องการครับ
Date.png
You do not have the required permissions to view the files attached to this post.
Top
ZEROV
Member
Member
Posts: 73
Joined: Thu Jun 03, 2010 6:31 pm

Re: สูตรหาวันที่ในเดือน

#12

Post by ZEROV »

ถ้าต้องการเริมต้นที่เดือน 5
=DATE(2017,ROWS($A$1:A5),21)-MID(1200000,MOD(DATE(2017,ROWS($A$1:A5),21),7)+1,1)

หรือ

=DATE(2017,ROWS($A$1:A1)+4,21)-MID(1200000,MOD(DATE(2017,ROWS($A$1:A1)+4,21),7)+1,1)
Top
User avatar
snasui
Site Admin
Site Admin
Posts: 30917
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:
Contact snasui

Re: สูตรหาวันที่ในเดือน

#13

Post by snasui »

วังวู ช่ง wrote:ตามที่ถามถือว่าใช้ได้แล้วครับ ขอบคุณมากครับ แต่ปัญหาอยู่ที่ว่า ถ้าเปลี่ยนแปลงวัน/เดือน/ปี คำตอบออกมาจะไม่ตรงตามต้องการครับ
ช่วยดูให้อีกครับ
:D อีกตัวอย่างสูตรครับ

เซลล์ E1 คีย์

=Iferror(SMALL(IF(WEEKDAY($A$1:$A$28,2)<6,$A$1:$A$28),ROWS(E$1:E1)),"")

Ctrl+Shift+Enter > Copy ลงด้านล่าง
Top
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

Re: สูตรหาวันที่ในเดือน

#14

Post by วังวู ช่ง »

ขอบคุณทุกๆท่านครับ ลองก่อนครับ ไงจะแจ้งให้ครับ
Top
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

Re: สูตรหาวันที่ในเดือน

#15

Post by วังวู ช่ง »

snasui wrote:
:D อีกตัวอย่างสูตรครับ

เซลล์ E1 คีย์

=Iferror(SMALL(IF(WEEKDAY($A$1:$A$28,2)<6,$A$1:$A$28),ROWS(E$1:E1)),"")

Ctrl+Shift+Enter > Copy ลงด้านล่าง[/quote]
ขอโทษครับ ไม่รู้จะอธิบายอย่างรัยครับ ความต้องการเป็นดั่งนี้ครับท่าน อาจารย์
You do not have the required permissions to view the files attached to this post.
Top
User avatar
snasui
Site Admin
Site Admin
Posts: 30917
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:
Contact snasui

Re: สูตรหาวันที่ในเดือน

#16

Post by snasui »

:D ตามสูตรที่ผมตอบไปผิดพลาดตรงไหน อย่างไร นำสูตรนั้นไปใช้แล้วแจ้งที่ยังติดปัญหา จะได้ดูต่อไปจากนั้นครับ
Top
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

Re: สูตรหาวันที่ในเดือน

#17

Post by วังวู ช่ง »

snasui wrote::D ตามสูตรที่ผมตอบไปผิดพลาดตรงไหน อย่างไร นำสูตรนั้นไปใช้แล้วแจ้งที่ยังติดปัญหา จะไ้ดดูต่อไปจากนั้นครับ
ความหมายคือว่า
ที่ A1 เราเปลี่ยนแปลง วันเดือนปีตลอดครับ และ มีแต่ Cell A1 เท่านั้นครับ ที่ A2,A3,A4........... ไม่มีวันเดือนปีครับ ต้องการให้ออกตาม Column F ครับ
รบกวนครับ
You do not have the required permissions to view the files attached to this post.
Top
User avatar
snasui
Site Admin
Site Admin
Posts: 30917
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:
Contact snasui

Re: สูตรหาวันที่ในเดือน

#18

Post by snasui »

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

เซลล์ E1 คีย์

=DATE(YEAR($A$1),MONTH($A$1)+ROWS(E$2:E2)-1,21)-LOOKUP(WEEKDAY(DATE(YEAR($A$1),MONTH($A$1)+ROWS(E$2:E2)-1,21),2),{1,6,7},{0,1,2})

Enter > Copy ลงด้านล่าง
Top
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

Re: สูตรหาวันที่ในเดือน

#19

Post by วังวู ช่ง »

snasui wrote::D ตัวอย่างการปรับสูตรครับ

เซลล์ E1 คีย์

=DATE(YEAR($A$1),MONTH($A$1)+ROWS(E$2:E2)-1,21)-LOOKUP(WEEKDAY(DATE(YEAR($A$1),MONTH($A$1)+ROWS(E$2:E2)-1,21),2),{1,6,7},{0,1,2})

Enter > Copy ลงด้านล่าง
ครับ แบบนี้เลยครับท่านอาจารย์ ตรงความต้องการเลยครับ ขอบคุณมากครับ
:D :D :thup: :cp:
Top
วังวู ช่ง
Silver
Silver
Posts: 805
Joined: Thu May 31, 2012 2:27 pm
Location: Laos
Excel Ver: MS Excel for office 365 MSO
Contact:
Contact วังวู ช่ง

Re: สูตรหาวันที่ในเดือน

#20

Post by วังวู ช่ง »

รบกวนถามต่ออีกครับ
ความต้องการคือว่า อยากได้สูตรหาวันทำอิด และ วันสุดท้ายของเดือน ถ้ามันตรงกลับวันเสาร์ และ วันอาทิตย์ แม่นให้เลือกก่อน หรือ หลังวันดั่งที่เป็นวันจันทร์ หา ศุกร์ครับ
You do not have the required permissions to view the files attached to this post.
Top
Post Reply

Return to “Excel”