copy a field to another field one time

[Derek Davlut]

I have a date/time field called delivery and I would like to know if it is
possible to copy the delivery field into another field(inital delivery) when
it is initially set and have that field hold the delivery date. The problem
being is if the delivery field changes, I do not want the inital delivery to
change.

thanks,

Derek.

 

[Sue Mosher [MVP-Outlook]]

Sure. It helps to know that the date that Outlook uses to store a "None"
date value is #1/1/4501#. With that you can do:

Sub Item_CustomPropertyChange(ByVal Name)
Select Case Name
Case "Delivery"
If Item.UserProperties("Initial Delivery") = #1/1/4501# then
Item.UserProperties("Initial Delivery") = _
Item.UserProperties("Delivery")
' more Case statements for other properties you want to watch
End Select
End Sub