Forum Discussion

ZKMPk's avatar
ZKMPk
Copper Contributor
Aug 03, 2020

Need Your Help! How to Convert Date of Birth from Digits to Words (Text) Ms Access?

i am beginner dont understand coding very well, i saw a post in which i get code but i dont know it will work or now and i dont know how to use it in VBA. can anybody teach me ? Like 1/1/2000 First ...
age
Date of Birth
In English Words
NikolinoDE's avatar
NikolinoDE
Gold Contributor
Aug 03, 2020

ZKMPk 

 

I'm not sure since the translation isn't the best, so maybe you're looking for something like that.

 

 

Sub OnlyText()
Dim lngRow As Long
For lngRow = 1 To Cells(Rows.Count, 4).End(xlUp).Row
If Not IsEmpty(Cells(lngRow, 4)) Then
If IsDate(Cells(lngRow, 4)) Then
Cells(lngRow, 4) = Format(Cells(lngRow, 4), "DDDD.MMMM.YYYY")
End If
End If
Next
End Sub

 

 

If you find this helpful, please mark it as "Best Answer" and as Like (click thumbs up), it will be beneficial to more Community members reading here.

 

Nikolino

I know I don't know anything (Socrates)

  • Daniel_Pineault's avatar
    Daniel_Pineault
    MVP
    Aug 03, 2020
    That's Excel code and this is an Access question/forum.

    There are no cells, rows, xlUp, ... in Access.
    • NikolinoDE's avatar
      NikolinoDE
      Gold Contributor
      Aug 03, 2020
      ups sry wrong forum landed

      but if I'm here ... here is a link to help ... if it helps 🙂

      https://codekabinett.com/rdumps.php?Lang=2&targetDoc=date-time-data-type-vba-access

      The third-party products that this article discusses are manufactured by companies that are independent of me. I makes no warranty, implied or otherwise, about the performance or reliability of these products.

      Thx
      Nikolino

Resources