Color Property

Returns or sets a Long indicating the color of the note. Can be one of the following OlNoteColor constants: olBlue, olGreen, olPink, olWhite, or olYellow. Read/write.

objNoteItem**.Color**

*objNoteItem    * Required. An expression that returns one of the objects in the Applies To list.

Example

This example creates a new NoteItem    and sets the color to blue.

Sub CreatePersonalNote()
    Dim myOlApp As Outlook.Application
    Dim myItem As Outlook.NoteItem
    Set myOlApp = CreateObject("Outlook.Application")
    Set myItem = myOlApp.CreateItem(olNoteItem)
    myItem.Color = olBlue
    myItem.Display
End Sub

If you use VBScript, you do not create the Application object, and you cannot use named constants. This example shows how to use the Color property using VBScript.

Set myItem = Application.CreateItem(5)
myItem.Color = 0

Applies to | NoteItem Object