Hello There,

I have a general column which needs to auto formatted to UK Date format mm/dd/yyyy.
For Ex:

General Column Required UK format Column
(Current Data) (after calculation)
12.07.2012 12/07/2012
08.07.2011 08/07/2011
02.06.2011 02/06/2011
30.01.2011 30/01/2011
09.09.2000 09/09/2011

I wrote the following Macro, But it throws Run-time error 1004. Application defined or object defined error. While debugging, I see NULL value getting assigned to Application.ReplaceFormat.NumberFormat in line number 15 than getting formatted to "dd/mm/yyyy"

Sub ReplaceGenToDateformat()

' - Optionally reenable improperly terminated Change Event macros

Application.DisplayAlerts = True
Application.EnableEvents = True 'should be part of Change Event macro
If Application.Calculation = xlCalculationManual Then
MsgBox "Calculation was OFF will be turned ON upon completion"
End If
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual

Range("C:C").Activate
Application.FindFormat.NumberFormat = "@"
Application.ReplaceFormat.NumberFormat = "dd/mm/yyyy"
Selection.Replace What:="", Replacement:="", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=True, ReplaceFormat:=True

End Sub

Appreciate your help.