在VBA中将任务添加到Outlook日历 [英] Adding a Task to Outlook Calendar in VBA

问题描述

我使用以下代码将任务添加到我的Outlook日历&它工作得很好。但是，条目不是很明显，有没有办法修改字体，颜色，使它变得粗体......任何一种东西？！？

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

推荐答案

我找不到这样做的方法，但是我确实发现你可以创建规则，它将使用条件格式化任务...非常详细和这里解释...



http：/ /www.brighthub.com/office/collaboration/articles/21829.aspx [ ^ ]

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[^]

这篇关于在VBA中将任务添加到Outlook日历的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！