Excel VBA date format problem

Can anyone advise on this please.

I have a spreadsheet in which I need to enter the current date, so I wrote a simple one-line macro, and tied it to ^D (for Date); it reads

Cells(ActiveCell.Row, ActiveCell.Column).Value =  Format(Date, "dd/mm/yyyy")

It basically works, except that the date that appears in the cell uses American format, and shows up as mm/dd/yyyy. If I assign the output of the Format function to a string variable, it’s formatted the way I want, day first. Can anyone shed light on why, or suggest how to keep the UK format date?

Peter

Thanks, worked a treat!