: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. กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
Kimacus
Member
Member
Posts: 25
Joined: Tue May 19, 2015 9:15 am

อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#1

Post by Kimacus »

คือผมอยากทำให้
วันที่แดสง รันไปเองครับ

เช่น หน้า 1 วันที่ 1/1/58
หน้า2 ก็เป็น 2/1/58 แบบนี้ครับ ผมใช้สูตร =TOday() แล้วมันเป็น วันที่ ปัจจุบันครับ


ขอความกรุณาด้วยนะครับ ขอบคุณครับ
User avatar
DhitiBank
Gold
Gold
Posts: 1676
Joined: Mon Oct 15, 2012 12:07 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#2

Post by DhitiBank »

ไม่รู้ใช่อย่างที่ต้องการหรือเปล่า ลองดูแบบนี้ครับ
สมมติว่า หน้าที่ 1 คีย์วันที่เริ่มต้นที่เซลล์ A1 และแต่ละหน้ามี 20 แถว เท่าๆ กัน
ที่ A21 คีย์
=$A$1+INT((ROWS($A$1:A21)-1)/20)

แล้วคัดลอกไปที่ A41, A61, ...

ในกรณีที่วันที่เริ่มต้นในหน้าแรกไม่ได้คีย์ที่ A1 ก็แก้ไขตำแหน่งสีแดงในสูตร
และหากแต่ละหน้าไม่ได้มี 20 แถว เช่นอาจมี 30 แถว ก็ให้แก้ไขตรงเลขสีน้ำเงินในสูตรครับ

แต่จุดสำคัญคือ ต้องคีย์วันที่เองก่อนในหน้าที่ 1 และแต่ละหน้าต้องมีจำนวนบรรทัดเท่าๆ กัน หากเงื่อนไขไม่เป็นแบบนี้ก็ลองค้นหาวิธีรันวันที่ในบอร์ดนี้ครับ รู้สึกว่าจะมีวิธีใส่ด้วย Excel4 Macro (เอ... หรือว่าจำผิด)
Kimacus
Member
Member
Posts: 25
Joined: Tue May 19, 2015 9:15 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#3

Post by Kimacus »

เดียวลองดู ก่อนนะครับ ขอบคุมากครับ เดียวมา บอกน้าาา
User avatar
DhitiBank
Gold
Gold
Posts: 1676
Joined: Mon Oct 15, 2012 12:07 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#4

Post by DhitiBank »

Kimacus wrote:เดียวลองดู ก่อนนะครับ ขอบคุมากครับ เดียวมา บอกน้าาา
ผิดกฎข้อ 1 ด้านบน ระวังจบไม่สวยนะครับ ;)
Kimacus
Member
Member
Posts: 25
Joined: Tue May 19, 2015 9:15 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#5

Post by Kimacus »

ไม่ได้ครับ Y_Y
User avatar
DhitiBank
Gold
Gold
Posts: 1676
Joined: Mon Oct 15, 2012 12:07 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#6

Post by DhitiBank »

หากแนบไฟล์พร้อมใส่ตัวอย่างสิ่งที่ต้องการมาด้วยจะดีมากครับ เพื่อนๆ จะได้ช่วยเหลือได้สะดวกและจะได้ดูว่าทำอย่างไรไปแล้วบ้าง
Kimacus
Member
Member
Posts: 25
Joined: Tue May 19, 2015 9:15 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#7

Post by Kimacus »

หน้าที่ผมทำครับ อยากให้วันที่ มัน รันออโต้ ต่อจากหน้า 1 ครับ
You do not have the required permissions to view the files attached to this post.
User avatar
DhitiBank
Gold
Gold
Posts: 1676
Joined: Mon Oct 15, 2012 12:07 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#8

Post by DhitiBank »

แบบนี้เรียกว่า "แผ่นงาน" ครับ หรือเรียก "ชีท" หรือ "ชีต" ก็ได้
ลองง่ายๆ แบบนี้ครับ
1. เม้าเลือกที่ชีท "วันที่2" คลิกเลือกเซลล์ I7
2. พิมพ์เครื่องหมาย =
3. เอาเม้าส์เลือกชีท "วันที่1" แล้วคลิกที่เซลล์ I7
4. พิมพ์ต่อด้วย +1
จะเห็นที่ formula bar เป็นแบบนี้ครับ
=วันที่1!I7+1
แล้วกด Enter

ชีทต่อๆ ไปก็ทำแบบเดียวกัน แต่เปลี่ยนเป็น +2 (ชีท "วันที่3"), +3 (ชีท "วันที่4"), +4 (ชีท "วันที่5"), ... ไปเรื่อยๆ ครับ
Kimacus
Member
Member
Posts: 25
Joined: Tue May 19, 2015 9:15 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#9

Post by Kimacus »

ขอบคุณครับ
Kimacus
Member
Member
Posts: 25
Joined: Tue May 19, 2015 9:15 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#10

Post by Kimacus »

รบกวนถามอีกนิดครับ พอดีจะให้เลขข้างหน้าเปลี่ยนครับ ที่ ทำแบบนี้ ตัวเลขแถว2เปลี่ยนอย่างเดียวครับ พอมีวิธีกำหนดให้ค่าข้างหน้าเปลี่ยนได้ไหมครับ



1/1/2558 >>> 2/1/2558
User avatar
DhitiBank
Gold
Gold
Posts: 1676
Joined: Mon Oct 15, 2012 12:07 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#11

Post by DhitiBank »

ที่เป็นแบบนั้นคงเพราะรูปแบบวันที่แสดงเป็น เดือน/วัน/ปี

ให้ไปเปลี่ยนที่ คลิกขวาที่เซลล์ --> Format cells... --> Number (Tab) --> Date แล้วเลือกรูปแบบตามต้องการครับ

หรือถ้าหากยังไม่เปลี่ยนอีก ก็คงต้องเข้าไปตั้งค่าที่วินโดวส์แล้วครับ ใน Control Panel
Kimacus
Member
Member
Posts: 25
Joined: Tue May 19, 2015 9:15 am

Re: อยากทราบการ ทำวันที่ให้ รันไปเองครับ

#12

Post by Kimacus »

ชัดเจนมากครับ ขอบคุณมากครับ ช่วยผมได้มากเลยครับ สังคมนี้ดีจริงๆ
Post Reply