Reply
 
Thread Tools Display Modes
  #1   Report Post  
Posted to microsoft.public.word.docmanagement
liquidator liquidator is offline
external usenet poster
 
Posts: 1
Default How to Print from Explorer without Date fields updating automatica

I receive hundreds of Word 2002 Documents from 3rd parties that need to be
printed to an imaging system. Many of these have date fields that
automatically update when printed due to settings used when originally
created by the 3rd parties.

How can I turn this off globally to avoid having to manually open and edit
each Word 2002 document?

P.S. I'm using Word 2002/XP and Word 2003, same issues occurring on each.
--
John
  #2   Report Post  
Posted to microsoft.public.word.docmanagement
Graham Mayor Graham Mayor is offline
external usenet poster
 
Posts: 19,312
Default How to Print from Explorer without Date fields updating automatica

The problem is likely to be that the documents have DATE fields when they
probably need CREATEDATE fields. DATE fields reflect the system date of the
PC, whereas CREATEDATE field reflect the date that the document was created.
You can confirm that by Pressing ALT+F9 and checking the field type. If that
is indeed the case the following macro will convert all the DATE fields to
CREATEDATE fields in all the docuemnts in a selected folder:

Sub BatchFixDates()
Dim myFile As String
Dim PathToUse As String
Dim myDoc As Document
Dim iFld As Integer
Dim fDialog As FileDialog
Set fDialog = Application.FileDialog(msoFileDialogFolderPicker)

With fDialog
.Title = "Select Folder containing the documents to be modifed and click
OK"
.AllowMultiSelect = False
.InitialView = msoFileDialogViewList
If .Show -1 Then
MsgBox "Cancelled By User"
Exit Sub
End If
PathToUse = fDialog.SelectedItems.Item(1)
If Right(PathToUse, 1) "\" Then PathToUse = PathToUse + "\"
End With

If Documents.Count 0 Then
Documents.Close Savechanges:=wdPromptToSaveChanges
End If

myFile = Dir$(PathToUse & "*.doc")

While myFile ""
Set myDoc = Documents.Open(PathToUse & myFile)
ActiveWindow.View.ShowFieldCodes = True
For iFld = ActiveDocument.Fields.Count To 1 Step -1
With ActiveDocument.Fields(iFld)
If .Type = wdFieldDate Then
.Code.Text = Replace(.Code.Text, "DATE", "CREATEDATE")
.Update
End If
End With
Next iFld
ActiveWindow.View.ShowFieldCodes = False
myDoc.Close Savechanges:=wdSaveChanges
myFile = Dir$()
Wend
End Sub

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

However, there are other types of date fields that may be involved. The
obvious one being PRINTDATE. If it is PRINTDATE fields (or some other field
type) that is the issue report back.


--

Graham Mayor - Word MVP

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



liquidator wrote:
I receive hundreds of Word 2002 Documents from 3rd parties that need
to be printed to an imaging system. Many of these have date fields
that automatically update when printed due to settings used when
originally created by the 3rd parties.

How can I turn this off globally to avoid having to manually open and
edit each Word 2002 document?

P.S. I'm using Word 2002/XP and Word 2003, same issues occurring on
each.



Reply
Thread Tools
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Updating date Kipper6 New Users 2 September 25th 07 01:47 AM
Future Date/Print Date Fields [email protected].(donotspam) Microsoft Word Help 2 September 7th 07 10:22 AM
Turn off updating date fields MrJuggles Microsoft Word Help 13 July 18th 07 03:07 PM
Date not updating to the current date on a Networked Word Template Eurkie Microsoft Word Help 3 January 31st 05 03:59 PM
updating date and time Dave888 Microsoft Word Help 1 December 10th 04 03:46 AM


All times are GMT +1. The time now is 08:55 AM.

Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 Microsoft Office Word Forum - WordBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Word"