สอบถามเรื่อง Code VB รัน AutoNumber เพิ่มการรันเดือน
Posted: Fri Apr 06, 2018 9:23 am
Code: Select all
"I " & ((Year(Now) + 543 - 2500) * 10000) + (Sheet2.Range("C" & Rows.Count).End(xlUp).Row)ถ้าผมอยากได้ การแสดงเป็น I 61 (เดือน) 001 ผมจะต้องเขียน Code แทรกลงไปอย่างไรครับ ขอบคุณมากครับ
I 61 04 001
การจัดรูปแบบวันที่ให้เป็น วัน เดือน ปี หรือรูปแบบใด ๆ สามารถใช้ Format หรือ WorksheetFunction.Text เข้ามาช่วยได้ครับ เช่น ด้านล่าง ลองนำไปประยุกต์ดูครับ