#1
|
|||
|
|||
Outlook 2003-formatting vba Date stamp
Hi.
Is there something I can add to my Outlook code to reformat the Date from mm/dd/yyyy to a date format that uses the month name instead of number? Also, is there any way to place the date in a specific part of the email body? Right now it appears at the bottom left of the email body. Thanks! Here's what I'm using: Code:
Sub StampDateHTML() Dim objOL As Outlook.Application Dim objNS As Outlook.NameSpace Dim objItem As Object Dim strStamp As String On Error Resume Next Set objOL = Application Set objItem = objOL.ActiveInspector.CurrentItem If Not objItem Is Nothing Then If objItem.BodyFormat = olFormatHTML Then Set objNS = objOL.Session strStamp = "<p>" & Date objItem.HTMLBody = Replace(objItem.HTMLBody, _ "</body>", _ strStamp & "</body>", _ , , vbTextCompare) End If End If Set objOL = Nothing Set objNS = Nothing Set objItem = Nothing End Sub |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Date formatting | kjxavier | Excel | 18 | 08-23-2011 08:21 AM |
Date formatting | kjxavier | Excel | 6 | 08-12-2011 05:46 AM |
Date formatting | kjxavier | Excel | 0 | 08-10-2011 08:17 AM |
Date Formatting in MS word 2007 | Karthick | Word | 4 | 01-19-2010 05:54 AM |
Add date and time stamp to new mail and incoming mail | cadsmarter | Outlook | 0 | 02-02-2006 08:50 AM |