Item Method

Microsoft Outlook Visual Basic

Returns an object from a collection. The following table shows the collections supported and the object type returned.

Collection Object Returned
Actions Action
AddressEntries AddressEntry
AddressLists AddressList
Attachments Attachment
Exceptions Exception
Explorers Explorer
Folders MAPIFolder
Inspectors Inspector
Items Outlook item
Links Link
OutlookBarGroups OutlookBarGroup
OutlookBarShortcuts OutlookBarShortcut
Pages Page
Panes Pane
PropertyPages PropertyPage
Selection Outlook item
SyncObjects SyncObject
Recipients Recipient
UserProperties UserProperty
All other Microsoft Outlook collections A generic Object representing a single object in the specified collection

expression.Item(Index)

expression    Required. An expression that returns a valid collection object.

Index    Required Variant. Either the index number of the object, or a value used to match the default property of an object in the collection.

Example

The following Microsoft Visual Basic/Visual Basic for Applications (VBA) example uses the Count property and Item method of the Selection collection returned by the Selection property to display the senders of all messages selected in the active explorer window. To run this example without errors, select items of type MailItem only. Other types such as ReportItem do not have the SenderName property and will cause an error.

Sub GetSelectedItems()
	Dim myOlApp As New Outlook.Application
	Dim myOlExp As Outlook.Explorer
	Dim myOlSel As Outlook.Selection
	Dim MsgTxt As String
	Dim x As Integer
	MsgTxt = "You have selected items from: "
	Set myOlExp = myOlApp.ActiveExplorer
	Set myOlSel = myOlExp.Selection
	For x = 1 To myOlSel.Count
		MsgTxt = MsgTxt & myOlSel.Item(x).SenderName & ";"
	Next x
	MsgBox MsgTxt
End Sub
		

The following example adds the public folder Internal to the user's Favorites folder by using the AddToPFFavorites method.

Sub AddToFavorites()
	'Adds a Public Folder to the List of favorites
	Dim olapp As Outlook.Application
	Dim objFolder As Outlook.MAPIFolder
	Set olapp = Outlook.Application
	Set objFolder = olapp.Session.GetDefaultFolder(olPublicFoldersAllPublicFolders).Folders.Item("GroupDiscussion").Folders.Item("Standards").Folders.Item("Internal")
	objFolder.AddToPFFavorites
End Sub