Format the Default Date

[Michael Singmin]

Hello group,

Ctrl ; inserts the current date into a cell
It is always formatted as the first choice
for dates viz. *14-03-01

Can I change the default format to 14-Mar-01 whenever
I use Ctrl ;

Thanks,

Michael Singmin

 

[Tom Ogilvy]

I suspect it uses the short date format. This can be redefined for windows
in the regional settings in the control panel.

 

[Gord Dibben]

Tom/Michael

I can't get the short date format to return 14-Mar-05 in Excel by changing
regional options in WindowsXP SP2.

So, I assigned this macro to CTRL + d

Sub NOWDATE()
With ActiveCell
.Value = Format(Date, "dd-mmm-yy")
.Columns.AutoFit
End With
End Sub


Gord Dibben Excel MVP

 

[Tom Ogilvy]

After changing it, I had to close excel and reopen it, but it did change how
thinks worked.

From the immediate window:

? ActiveCell.Value
38482
? Format(activecell,"Short Date")
10-May-05

However, it didn't do what the OP wanted. When I did the shortcut key
combination, it entered it dd-mm-yy

So I don't think there is a way to change the default unless you want to
change the Normal style for number to be d-mmm-yy which did work, but then
every number was interpreted as a date.

 

[Tom Ogilvy]

All that said,
I assumed preformatting the cells where you will do this is not possible.

--
Regards,
Tom Ogilvy

After changing it, I had to close excel and reopen it, but it did change how
thinks worked.

From the immediate window:

? ActiveCell.Value
38482
? Format(activecell,"Short Date")
10-May-05

However, it didn't do what the OP wanted. When I did the shortcut key
combination, it entered it dd-mm-yy

So I don't think there is a way to change the default unless you want to
change the Normal style for number to be d-mmm-yy which did work, but then
every number was interpreted as a date.

--
Regards,
Tom Ogilvy

Tom/Michael

I can't get the short date format to return 14-Mar-05 in Excel by changing
regional options in WindowsXP SP2.

So, I assigned this macro to CTRL + d

Sub NOWDATE()
With ActiveCell
.Value = Format(Date, "dd-mmm-yy")
.Columns.AutoFit
End With
End Sub


Gord Dibben Excel MVP

 

[Michael Singmin]

Thanks Tom,

I checked Regional Settings and the short date was okay.
I decided to make my own macro for the date setting.

Cheers,

Michael