Click here to Skip to main content
11,805,035 members (66,091 online)
Rate this: bad
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
    End With
    Set olTsk = Nothing
    Set olApp = Nothing
End Sub
Posted 17-Jan-13 11:41am

1 solution

Rate this: bad
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 ...[^]
RedDk at 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
0 OriginalGriff 305
1 Sergey Alexandrovich Kryukov 268
2 CPallini 210
3 Richard Deeming 190
4 CHill60 150
0 OriginalGriff 3,255
1 Maciej Los 1,990
2 KrunalRohit 1,907
3 CPallini 1,855
4 Richard MacCutchan 1,227

Advertise | Privacy | Mobile
Web03 | 2.8.151002.1 | Last Updated 21 Feb 2013
Copyright © CodeProject, 1999-2015
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