Click here to Skip to main content
12,243,522 members (42,472 online)
Rate this:
 
Please Sign up or sign in to vote.
See more: Outlook VBA
I am using the following code to add a task to my Outlook calendar & it works just fine. However, the entry is not very noticeable, is there a way to amend the font, the colour, to make it bold ... any of that kind of thing ?!?

Sub AddToCalendar()
 
    Dim olApp As Outlook.Application
    Dim olTsk As TaskItem
 
    Set olApp = New Outlook.Application
    Set olTsk = olApp.CreateItem(olTaskItem)
 
    With olTsk
        .Subject = myEmailFolder & " Newsletter is Due"
        .Status = olTaskInProgress
        .Importance = olImportanceHigh
        .DueDate = Date + 3
        .Save
    End With
 
    Set olTsk = Nothing
    Set olApp = Nothing
 
End Sub
Posted 17-Jan-13 12:41pm

1 solution

Rate this: bad
 
good
Please Sign up or sign in to vote.

Solution 1

I couldn't find a way of doing this, BUT, I did find that you can create Rules which will format the Tasks using Conditions ... perfectly detailed and explained here ...

http://www.brighthub.com/office/collaboration/articles/21829.aspx[^]
  Permalink  
Comments
RedDk 2-Mar-15 15:03pm
   
Great tip, my 5

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
Top Experts
Last 24hrsThis month


Advertise | Privacy | Mobile
Web01 | 2.8.160426.1 | Last Updated 21 Feb 2013
Copyright © CodeProject, 1999-2016
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100