Macro to change a date from American to English?

Question

Does anyone know a macro so I can run it through Excel to change the whole spreadsheet date format from American to English?

Answer 1

Sub enFormat()    
Sheets("Sheet1").Cells.NumberFormat = "dd/mm/yyyy"    
End Sub

Answer 2

Select the cells you want to change, open their format dialog (on old versions it was Ctrl+1) and change it.