View Single Post
  #1  
Old September 5th 08, 01:16 PM posted to microsoft.public.outlook.program_forms
srm
external usenet poster
 
Posts: 72
Default Insert Date - Format Text / Cursor Location

I'm using O2003. I have a simple script that inserts the date and some
text in notes and adds a carriage return /line feed at the end. Need
help on two items.

Can I bold just the date and have the cursor be on the new line on the
left. So for example the result of running the script would be as
follows:

bold09/05/08bold - Sample text
cursor location

Thanks

Shawn

====================

Sub InsertDate()
Dim objItem As Object

Set objItem = Application.ActiveInspector.CurrentItem
objItem.Body = objItem.Body & Format(Date, "mm/dd/yy") & " -
Sample text" & vbCrLf

Set objItem = Nothing

End Sub

=====================
Ads