format of date insert in word

[99mel]

Can i include the 'th', 'st', 'rd' after the date (dd)?

The nearest format available to choose is '30 May 2002'
Can i have it so its '30th May 2002'?

 

[xlhelp]

If it was a simple matter of adding just the th, it's easy. But since you have st, nd and rd also, you would probably have to use VBA.

Indu

 

[99mel]

can i easily implement it in vba then? so when the document opens the specfic letters are added?

 

[xlhelp]

You will have to test the cell for the date and then depending on the whether it is 1, 2, 3, 21, 22, 23 ,31 or other; you will have to include a statement similar to

Selection.NumberFormat = "dd""th""-mmm-yy"

replacing th with st, nd and rd

HTH

Indu

 

[xlhelp]

Profuse apologies.

I was working under Excel mode. I beg your pardon.

Back to the drawing board.

Indu

 

[xlhelp]

Loking for redemption.

This macro will do what you are looking for.

Sub dtmacro()

Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:="DATE \@ ""d"" \* ordinal", PreserveFormatting:=True
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:="DATE \@ "" MMMM yyyy""", PreserveFormatting:=True


End Sub

HTH

Indu

 

[99mel]

Is this adding a new date time field?

ummm, if so where?

So if i make this macro and run it when the document loads up?

cheers for ya help.

 

[xlhelp]

It puts today's date at cursor position. So, I guess it would put it at the top left if it's part of auto_open.

Indu