Type Info:
DateTimeModified As Date
Dim TU As TransUnit Dim modified As Date Set TU = Application.ActiveTransUnit modified = TU.DateTimeModified