ขึ้นเตือน run time error 438

[kingkopbra]

ไฟล์นี้ทำขึ้นมาเพื่อ Print invoice ให้ทางลูกค้า ซึ่งลูกค้าจะส่ง PO มาเป็น ไฟล์ text
ปัญหาอยู่ที่ Sheet invoice ตรงที่ผมทำกรอบสีแดงไว้โดยผมตั้งให้ช่อง AE22 เมื่อกดแล้วจะมีปฏิทินให้เลือกวัน เดือน ปี
โดยจะมองเห็นวันที่เลือกต่อเมื่อเราระบุเลข Customer PO เองในช่อง AE4 ( ใส่ vb code ไว้ที่ work sheet 5 )
ซึ่งก่อนหน้านี้ตรง ช่องนี้ จะแสดงค่าจากการเลือกวัน เดือน ปี จาก Drop down list พอผมเปลี่ยนมาเป็น Calendar
ก็เกิดปัญหาโดยที่เมื่อผมไปกด Port ข้อมูลที่ Sheet PO ตรง ปุ่ม copy to invoice จะขึ้น RUN TIME ERROR 438 ทันที
ซึ่งไฟล์ที่ใช้ Drop down เลือกวันไม่เกิดปัญหานี้

ขอคำแนะนำด้วนครับ Pass word = keng

[snasui]

ผมไม่ไดใช้ Calendar จึงไม่สามารถทดสอบให้ได้ครับ