Date to Text reversed.

[Edgarvelez]

Hi All,

Need a code

The date format is day month Year and the range is dynamic in column A.

Example 6-Nov result would be 20231106 in Column A

Thanks in advance

 

[Joe4]

Are your entries in column A valid date entries, or text entries?
If date entries, you can use this in column B (cell B2):

=TEXT(A2,"yyyymmdd")

 

[MountainFog]

=text($A2,"yyyymmdd")

 

[Edgarvelez]

Are your entries in column A valid date entries, or text entries?
If date entries, you can use this in column B (cell B2):

=TEXT(A2,"yyyymmdd")

 

[Edgarvelez]

formula works. but is there a code that can do this?

 

[Edgarvelez]

Hi All,

Need a code

The date format is day month Year and the range is dynamic in column A.

Example 6-Nov result would be 20231106 in Column A

Thanks in advance

formula works. but is there a code that can do this?

 

[Peter_SSs]

Could you just manually custom format column A as "yyyymmdd"?

Or if it must be code ..

Sub FormatA()
  Columns("A:A").NumberFormat = "yyyymmdd"
End Sub

Or if the result must be text

Sub FormatA_v2()
  With Range("A2", Range("A" & Rows.Count).End(xlUp))
    .NumberFormat = "@"
    .Value = Evaluate("text(" & .Address & ",""yyyymmdd"")")
  End With
End Sub

 

[Edgarvelez]

Are your entries in column A valid date entries, or text entries?
If date entries, you can use this in column B (cell B2):

=TEXT(A2,"yyyymmdd")

Thank you. This formula works.

 

[Edgarvelez]

=text($A2,"yyyymmdd")

Thank you, this formula worked.

 

[Edgarvelez]

Could you just manually custom format column A as "yyyymmdd"?

Or if it must be code ..

Sub FormatA()
  Columns("A:A").NumberFormat = "yyyymmdd"
End Sub

Or if the result must be text

Sub FormatA_v2()
  With Range("A2", Range("A" & Rows.Count).End(xlUp))
    .NumberFormat = "@"
    .Value = Evaluate("text(" & .Address & ",""yyyymmdd"")")
  End With
End Sub

Hi Peter I am having a troubles and I should have given a better explanation from the start, I have 3 sheets Dashboard, Split Shipment Import & Ports and Quality Data.
Ports and Quality Data I use it for my data validations lists which is not part of my problem.

As you can see we are using date month year, so I have to copy from this format and paste to the Split Shipment Sheet.

On the split Shipment Import sheet the result has to be as shown below in general format, the reason for the general format is because
because later on with a piece of code that I have I will export the sheet to a .CVS format is because our system will only take .CVS file with the data in General format.