Results 1 to 2 of 2
  1. #1
    New Lounger
    Join Date
    Mar 2002
    Location
    Anderson, Indiana
    Posts
    23
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Date & Time Stamp - Notes on Task (Office XP)

    Is there a way to have a date/time stamp whenever notes are updated on outlook tasks? <img src=/S/dizzy.gif border=0 alt=dizzy width=15 height=15>

  2. #2
    Uranium Lounger
    Join Date
    Dec 2000
    Location
    Salt Lake City, Utah, USA
    Posts
    9,508
    Thanks
    0
    Thanked 6 Times in 6 Posts

    Re: Date & Time Stamp - Notes on Task (Office XP)

    Greg, I do not know a way to do this neatly in native Outlook, even with VBA code. The nearest thing that comes to mind is from <!profile=jscher2000>jscher2000<!/profile>, who responded to a smilar request a while back with this code which can be called by a two keystroke combination to paste a date or time at the insertion point. (You could modify the first routine to paste both date and time if required.)

    Sub TypeDate()
    Dim doClip As DataObject
    Set doClip = New DataObject 'instantiate DataObject
    doClip.SetText Format(Now, "mm/dd/yy"), 1 'set dataobject to short date
    doClip.PutInClipboard 'transfer contents to clipboard
    SendKeys "^v" 'paste date wherever the insertion point is
    Set doClip = Nothing 'clear object
    End Sub

    Sub TypeTime()
    Dim doClip As DataObject
    Set doClip = New DataObject 'instantiate DataObject
    doClip.SetText Format(Now, "hh:nn:ss"), 1 'set dataobject to current time
    doClip.PutInClipboard 'transfer contents to clipboard
    SendKeys "^v" 'paste date wherever the insertion point is
    Set doClip = Nothing 'clear object
    End Sub
    -John ... I float in liquid gardens
    UTC -7ąDS

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •