[mso] Re: Word Question

If at first you don't succeed ....

You could make a 7 page document with the same form on each page and then
use a form field on each page to hold the date.  Set the type for each of
these form fields to Date and set the format to dd/MM/yyyy. Set a different
bookmark name on each form field, e.g. date1, date2, date3, etc and use the
macro boxes on the first form field to run the following macro on exit:

Sub dates()
'
' dates Macro
' Macro created 28/04/2006 by Andrea Jones
'
Dim start As String
start = ActiveDocument.FormFields("Date1").Result
ActiveDocument.FormFields("Date2").Result = DateAdd("d", 1, start) 
ActiveDocument.FormFields("Date3").Result = DateAdd("d", 2, start) 
ActiveDocument.FormFields("Date4").Result = DateAdd("d", 3, start) 
ActiveDocument.FormFields("Date5").Result = DateAdd("d", 4, start) 
ActiveDocument.FormFields("Date6").Result = DateAdd("d", 5, start) 
ActiveDocument.FormFields("Date7").Result = DateAdd("d", 6, start) 
End Sub

This macro picks up the date entered in the first date box and then adds on
the appropriate number of days and puts those values in the form fields on
the other pages.

Andrea Jones
www.allaboutoffice.co.uk

-- 
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.385 / Virus Database: 268.5.1/326 - Release Date: 27/04/2006
 

*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or 
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to 
mso-request@xxxxxxxxxxxxx with the word "unsubscribe" (without the quotes) in 
the subject line.

Or, visit the group's homepage and use the dropdown menu.  This will also allow 
you to change your email settings to digest or vacation (no mail).
http://www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group, send a 
request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation with 
instructions.  Once you are a member of the files group, you can go here to 
upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************

Other related posts: