ฉันไม่รู้เกี่ยวกับปีที่พิมพ์คำถาม ตอนนี้มันอาจจะเก่าแล้ว ดังนั้นฉันคาดว่าคำตอบของฉันจะเป็นข้อมูลอ้างอิงสำหรับคำถามที่คล้ายกันในอนาคตหลังจากโพสต์ของฉัน
ฉันไม่รู้ว่ามีใครให้คำตอบที่คล้ายกับที่ฉันกำลังจะให้หรือไม่ซึ่งอาจส่งผลให้ - ฉันคิดว่า - เป็นวิธีที่ง่ายที่สุดตรงที่สุดและมีประสิทธิภาพมากที่สุด: หากมีใครให้คำตอบไปแล้วฉันขอโทษ แต่ฉันไม่เห็นมัน ที่นี่คำตอบของฉันโดยใช้ CStr แทน TEXT:
Asuming เซลล์ A1 ประกอบด้วยวันที่และใช้รหัส VBA:
Dim strDate As String
'Convert to string the value contained in A1 (a date)
strDate = CStr([A1].Value)
หลังจากนั้นคุณสามารถปรับแต่งเป็นสตริงธรรมดาโดยใช้ฟังก์ชันสตริง (MID, LEFT, RIGHT, LEN, CONCATENATE (&) ฯลฯ )