Turn off updating date fields

[Guest]

Hi there
I know I've read about this in many threads, but I can't seem to actually
find a solution to my specific need (and I don't have good search skills)
I work in an office that takes many calls and as part of a word document I
put the date and time field in as an autocomplete. As in if we press two
buttons it puts the date and time in as we want it. However I didn't know
that this updates everytime you open up the document.
I tried putting it in as a macro with the insert date time and taking the
'autoupdate field' off but this is the extra little problem. We also have an
icon relating to what we want to input, a little telephone for a telephone
call, fax icon for fax sent, email icon for email sent and so on. However
the macro doesn't seem to want to deal with the icons, so I can put a macro
in for the "insert date time" with the auto complete off, but the icon won't
appear.
Is there anyway I can get a simple way for the icon to appear with the time
and date below of the time it was input, and have it stay like that?

 

[Guest]

I'm not sure which command you are using, but apparently it is inserting a
DATE field, when it should be inserting the CREATEDATE field instead.

For existing documents, do is the following: press Alt+F9 to display the
field codes. You should see something similar to: { DATE }. Change the
uppercase part to CREATEDATE and then press F9. To hide the field code, press
Alt+F9 again. Save the file. Repeat for other affected documents.

To fix the problem for new documents: Create a template where the CREATEDATE
field is inserted; as new documents are created from that template you will
get their creation dates properly inserted.

 

[Guest]

Hi there Stefan
Am I right in assuming that the only problem with that is it refers to the
date the document was created, so if the contacts go over several days then
the times of these calls won't be able to be recorded.
I want to be able to open the document whenver I contact a person and either
type something or press a button that will come up with a little logo for the
type of contact and the time and date it came in.
Does that make sense? I haven't got the best descriptive skills

MrJuggles aka Paul

 

[Graham Mayor]

A date field will always show the system date of the PC. A CreateDate field
will always show the date the document was created. You need to insert
dates as text. A macro is probably the simplest solution eg

Sub InsertUSFormatDate()
With Selection
.InsertDateTime DateTimeFormat:="MMMM" & Chr(160) & _
"d," & Chr(160) & "yyyy", InsertAsField:=False
End With
End Sub

In the above example Chr(160) is a non breaking space to ensure the date is
always on one line.

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

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[Suzanne S. Barnhill]

For what you are doing, you need to insert the date as text, which can't be
done with the built-in Alt+Shift+D shortcut. You have two options: insert
the DATE field as before and immediately unlink it (Ctrl+Shift+F9) or
write/record a macro to perform the actions in Insert | Date and Time, with
the desired format selected and the "Update automatically" box cleared
(which inserts the date as text).

When I recorded such a macro, the result was:

Sub Macro1()
'
' Macro1 Macro
' Macro recorded Thursday, July 12, 2007 by Suzanne S. Barnhill
'
Selection.InsertDateTime DateTimeFormat:="dddd, MMMM d, yyyy", _
InsertAsField:=False, DateLanguage:=wdEnglishUS, CalendarType:= _
wdCalendarWestern, InsertAsFullWidth:=False
End Sub

So you might play with this idea; you can, of course, assign a keyboard
shortcut to your macro.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA

Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

 

[Guest]

Thanks Graham
The only problem with that is I can't get the macro to insert a picture as
well, not one from a file. At the moment you can put these little
pictures/clip art in an autocorrect option.
If there's a way I can get a macro to insert a picture too, then we can
input these entries with one keypress.
thanks again for all your help and patience, I'm not a technophobe, but
there are gaps in my knowledge.

Cheers again

Paul

 

[Guest]

I don't know which icons you have used so far but maybe you could use a
character from e.g. the Wingdings font. Then you could have a macro for each
"icon" type - something like the following (adjust the date and time format
as needed):

Sub DateTime_Phone()

With Selection
'Insert date and time - adjust the format af needed
.InsertDateTime DateTimeFormat:="M/d/yyyy h:mm:ss am/pm", _
InsertAsField:=False
'Insert paragraph mark
.TypeText Chr(13)
'Insert Phone - replace CharacterNumber for other icons
.InsertSymbol Font:="Wingdings", _
CharacterNumber:=40, _
Unicode:=False
End With
End Sub

You could e.g. use chr(42) for mail and chr(50) for fax.

--
Regards
Lene Fredborg
DocTools - Denmark
www.thedoctools.com
Document automation - add-ins, macros and templates for Microsoft Word

 

[Guest]

Sorry, I feel like a bit of a heel for going on.
I do get the idea of a macro for the inserting the details I want, and it
works perfectly. The only problem is this, the macro doesn't instert a log
or icon or let me do so. I would like the icon above the date and time so we
can recognise the type of contact we have (phone, email, letter, home visit)
Thanks again
Mr Juggles

 

[Graham Mayor]

If Lene's suggestion doesn't cut it, what is the source of your logo(s)?

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[Graham Mayor]

The following inserts a logo saved as an autotext entry called 'Logo' then
puts the date on the next line

Sub InsertUSFormatDate()
NormalTemplate.AutoTextEntries("Logo").Insert Where:=Selection.Range
With Selection
.TypeParagraph
.InsertDateTime DateTimeFormat:="MMMM" & Chr(160) & _
"d," & Chr(160) & "yyyy", InsertAsField:=False
End With

the following version inserts an image from file

Sub InsertUSFormatDate()
With Selection
.InlineShapes.AddPicture FileName:= _
"D:\path\filename.gif", LinkToFile:=False, _
SaveWithDocument:=True
.TypeParagraph
.InsertDateTime DateTimeFormat:="MMMM" & Chr(160) & _
"d," & Chr(160) & "yyyy", InsertAsField:=False
End With
End Sub


--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[Guest]

Thanks for all the great replies. I'm going to get around to trying them this
weekend and I'll let you know which one worked for me. I've just re-read all
the posts and realised I missed a respone or two so I have a few ideas to try.
Graham, the source of my origional icon was just a downloaded clipart, but
then I resized in, highlighted it and used that as an auto correct option.
Keeps your fingers crossed all, and thanks aagin for the help, I'll let you
know what happens

 

[Graham Mayor]

Insert the autocorrected clip art then save that as an autotext entry to use
the suggested macro.

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[Guest]

Yahey
It's done, it works, at last. I had a little problem with the macro but I
searched around and found it wasn't saving. But I've learnt how to save it to
the file I want it to.
That feels good.

Thanks for all the great advice everyone.
Cheers Graham


MrJuggles (aka Paul)

 

[Graham Mayor]

You are welcome

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>