Was this page helpful?
Your feedback about this content is important. Let us know what you think.
Additional feedback?
1500 characters remaining
Export (0) Print
Expand All

Actions Property

Office 2003

Returns an Actions collection that represents all the available actions for the Outlook item.

expression.Actions

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

Example

This Visual Basic for Applications (VBA) example creates a new mail item and uses the Add method to add an Action to it. Then it sends the mail item to the current user. The mail item received will have the 'Agree' action in addition to the standard actions such as 'Reply' and 'Reply All'.

Sub AddAction()
	Dim myolApp As New Outlook.Application
	Dim myItem As Outlook.MailItem
	Dim myAction As Outlook.Action
	Set myItem = myOlApp.CreateItem(olMailItem)
	Set myAction = myItem.Actions.Add
	myAction.Name = "Agree"
	myItem.To = myolApp.GetNamespace("MAPI").CurrentUser
	myItem.Send
End Sub
		

The following Visual Basic for Applications example creates a new mail item and uses the Add method to add an Action called 'Link Original' to it. Executing this action will insert a link to the original mail item.

Sub AddAction2()
 Dim myOlApp As New Outlook.Application
 Dim myItem As Outlook.MailItem
 Dim myAction As Outlook.Action
 Set myItem = myOlApp.CreateItem(olMailItem)
 Set myAction = myItem.Actions.Add
 myAction.Name = "Link Original"
 myAction.ShowOn = olMenuAndToolbar
 myAction.ReplyStyle = olLinkOriginalItem
 myItem.To = "Dan Wilson"
 myItem.Send
End Sub
				

If you use Microsoft Visual Basic Scripting Edition (VBScript) in a Microsoft Outlook form, you do not create the Application object, and you cannot use named constants. This example shows how to perform the same task using VBScript.

Set myItem = Application.CreateItem(0)
Set myAction = myItem.Actions.Add
 myAction.Name = "Link Original"
 myAction.ShowOn = 2
 myAction.ReplyStyle = 4
 myItem.To = "Dan Wilson"
 myItem.Send
				


See Also | Action Object


Show:
© 2015 Microsoft