Home/ Questions/Q 7649095
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-05-31T10:52:41+00:00

I received a workbook from a colleague who does not use a consistent date

  • 0

I received a workbook from a colleague who does not use a consistent date format. The IF statement below outlines my thought process in trying to create a single IF statement that can convert the string or number into the proper date format by using MID and FIND:

=IF(ISTEXT(F49),MID(F49, FIND("/",F49)+1, FIND("/",F49, FIND("/",F49)+1)-FIND("/",F49)-1)&"/"&LEFT(F49,FIND("/",F49,1)-1)&"/"&RIGHT(F49,2),TEXT(F49,"dd/mm/yy"))

I am bit of a novice when it comes to VBA and wanted to create a custom function that can implement the steps outlined in the IF statement above. Any help/guidance would be greatly appreciated.

Thank you,

GG

Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. Editorial Team

    It looks like you are converting European to local American dates. There’s several methods to do this:

    a) VBA function [e.g. =ConvertDates(F49)]:

    Function ConvertDates(ValueDate As Range)
Dim Dates() As String
Dates = Split(ValueDate.Text, "/")
ConvertDates = Dates(1) & "/" & Dates(0) & "/" & Dates(2)
End Function

    b) Sheet formula (simplified version):

    =IF(ISTEXT(F49),MID(F49,4,3)&REPLACE(F49,4,5,""),TEXT(F49,"dd/mm/yy"))

    c) Select the dates in the column and choose:

    Data > Text to Columns > Next > Next > Column Data Format: DMY

    I think the third option might be quickest as you don’t need to create a new column.

    • 0