Hi all. I have a column (say col A) that has values in the format yyyy-mm-ddThh_mm_ss. I decided to create the function below to convert them to dd/mm/yyyy hh:mm:ss in column B. However I'm getting a #Name? error. I'm not exactly a VBA proficient and I would like your opinion about where it is going wrong.
Thanks!
Code:
Function DateTime(dtval As Range) As Date
'Converts the filenames with format yyyy-mm-ddThh_mm_ss into dd/mm/yyyy hh:mm:ss
Dim dayfn, monthfn, yearfn, hourfn, minutefn, secondfn As String
If dtval Is blank Then
Exit Function
Else
yearfn = Left(dtval, 4)
monthfn = Mid(dtval, 6, 2)
dayfn = Mid(dtval, 9, 2)
hourfn = Mid(dtval, 12, 2)
minutefn = Mid(dtval, 15, 2)
secondfn = Mid(dtval, 16, 2)
DateTime = Format("dayfn/monthfn/yearfn hourfn:minutefn:secondfn", "dd/mm/yyyy hh:mm:ss")
End If
End Function
Thanks!
Last edited: