Page 1 of 1

ทำให้ excel มีอายุการใช้งาน

Posted: Mon Dec 03, 2018 4:20 pm
by TanabadeeY
คือผมจะเอาไฟล์ Excel ไปให้บริษัททดลองใช้แต่อยากให้มีอายุ ผมเลยใส่สูตรนี้ไว้

If Date > 31 / 3 / 2019 Then
MsgBox "Contact Adminisrator"
Application.DisplayAlerts = False
ActiveWorkbook.Close
End If

ตอนทดลองครั้งแรกๆก็ยังปกติ พอเปิดปิดไฟล์ใหม่ซักพัก excel ก็จะขึ้นมาว่าหมดอายุ ทั้งๆที่สูตรก็ไม่ได้เปลี่ยนอะไร
เกิดจากอะไรหรอครับ
หรือมีสูตรอื่นที่ใช้ได้แล้วไม่ error แบบที่กล่าวมา
ขอบคุณครับ

Re: ทำให้ excel มีอายุการใช้งาน

Posted: Mon Dec 03, 2018 7:37 pm
by snasui
:D กรุณาโพสต์ Code ให้แสดงเป็น Code เพื่อจะแยกได้จากข้อความปกติ ซึ่งจะอำนวยความสะดวกต่อการอ่านของเพื่อนสมาชิกครับ

31/3/2019 ที่เขียนมาใน Code คือ 31 หาร 3 หาร 2019 ไม่ใช่วันที่เหมือนที่ตั้งใจให้เป็น หากจะเขียนเป็นวันที่จะมีลักษณะเป็น #3/31/2019# (รูปแบบเป็นเดือน วัน ปี) หรือ DateSerial(2019,3,31) เป็นต้นครับ

Re: ทำให้ excel มีอายุการใช้งาน

Posted: Mon Dec 03, 2018 8:11 pm
by TanabadeeY
snasui wrote: Mon Dec 03, 2018 7:37 pm :D กรุณาโพสต์ Code ให้แสดงเป็น Code เพื่อจะแยกได้จากข้อความปกติ ซึ่งจะอำนวยความสะดวกต่อการอ่านของเพื่อนสมาชิกครับ

31/3/2019 ที่เขียนมาใน Code คือ 31 หาร 3 หาร 2019 ไม่ใช่วันที่เหมือนที่ตั้งใจให้เป็น หากจะเขียนเป็นวันที่จะมีลักษณะเป็น #3/31/2019# (รูปแบบเป็นเดือน วัน ปี) หรือ DateSerial(2019,3,31) เป็นต้นครับ
ขอบคุณมากครับ