Excel Forum

Posted: **Tue Apr 12, 2022 8:41 pm**

ใน textbox1 จะต้องปรับ code อย่างไรครับ
เมื่อพิมพ์วันที่เป็น 17/6/2022 แล้วให้แสดงผลเป็น 17/06/2565
ซึ่ง code ที่ผมลองใช้ คือ

Private Sub TextBox1_AfterUpdate()
        Me.TextBox1 = Format(TextBox1, "[$-th-TH,107]d/mm/yyyy;@")
End Sub

ผลจาก code ที่ได้ คือ 17/06/2022
ขอบคุณสำหรับข้อแนะนำครับ

Posted: **Tue Apr 12, 2022 10:12 pm**

ตัวอย่างการปรับ Code ครับ

Me.TextBox1 = Application.Text(DateValue(TextBox1.Value), "d/mm/bbbb")

Format Date ใน Textbox