다음을 통해 공유


Formula Property

Returns or sets a String representing the formula for the user property. Read/write.

expression**.Formula**

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

Remarks

If a program tries to reference any type of recipient information by using the Outlook object model, a dialog box is displayed that asks you to confirm access to this information. You can allow access to the Address Book or recipient information for up to ten minutes after you receive the dialog box. This allows features, such as mobile device synchronization, to be completed.

You receive the confirmation dialog box when a solution tries to programmatically access the Formula property.

Example

The following Visual Basic for Applications (VBA) example shows how to use the Formula property.

Sub TestFormula()
    Dim outApp As New Outlook.Application
    Dim tki As Outlook.TaskItem
    Dim uprs As Outlook.UserProperties
    Dim upr As Outlook.UserProperty
    
    Set tki = outApp.CreateItem(olTaskItem)
    tki.Subject = "Work hours - Test Formula"
    tki.TotalWork = 4
    tki.ActualWork = 3
    Set uprs = tki.UserProperties
    Set upr = uprs.Add("Total&ActualWork", olFormula)
    upr.Formula = "[Total Work] + [Actual Work]"
    tki.Save
    
    tki.Display
   MsgBox "The Work Hours are: " & upr.Value
End Sub

Applies to | UserProperty Object