You could insert the date with a macro e.g. the following will insert the
days as
Mon
Tues
Wed
Thurs
Fri
Sat
Sun

Dim sDay As String
sDay = format(Date, "dddd")
Select Case sDay
Case Is = "Monday", "Wednesday", "Friday", "Saturday", "Sunday"
sDay = format(Date, "ddd")
Case Is = "Tuesday"
sDay = Left(sDay, 4)
Case Is = "Thursday"
sDay = Left(sDay, 5)
End Select
With Selection
.TypeText sDay & Chr(160)
.InsertDateTime DateTimeFormat:="M/d/yy", InsertAsField:=False
End With

http://www.gmayor.com/installing_macro.htm

--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org



Steve wrote:
Is there a way to customize the Insert Date function? I want the
format to look like this:

Tues 3/11/09

Thanks!