Lire en anglais

Partager via


Row.Item, méthode (Outlook)

Obtient un Object qui représente la valeur de l’objet Row à la colonne spécifiée par Index.

Syntaxe

expression. Élément (Index)

Expression Variable qui représente un objet Row .

Parameters

Nom Requis/Facultatif Type de données Description
Index Obligatoire Variant Valeur d’index de base 1 qui peut être un long représentant l’index de colonne pour la collection Columns ou une chaîne représentant le nom de la colonne.

Valeur renvoyée

Variant qui représente la valeur d’une propriété (telle que spécifiée par Index ) d’un élément (tel que spécifié par la ligne parente).

Remarques

La méthode Item est la méthode par défaut de l’objet Row, ce qui signifie qu’elle peut être utilisée de façon implicite. Les deux lignes de code suivantes accèdent toutes deux à la valeur de la propriété Subject au niveau de la ligne spécifiée dans une table :

Row.Item("Subject")

Row("Subject")

Si un objet Column a été ajouté à un objet Table avec un nom de propriété référençant un espace de noms, vous devez référencer l'objet Column dans la méthode Row.Item par le même espace de noms. Si vous utilisez une référence de nom intégré explicite dans Row.Item, vous obtenez une erreur.

Exemple

L'exemple de code suivant montre comment obtenir un objet Table basé sur l'heure de dernière modification des éléments exprimée par LastModificationTime dans la boîte de réception. Ce code permet d'énumérer et d'imprimer ensuite les valeurs des propriétés par défaut de ces éléments. Étant donné que la méthode Item est la méthode par défaut de l’objet Row , elle utilise la méthode Item de manière implicite.

Sub DemoTable() 
 'Declarations 
 Dim Filter As String 
 Dim oRow As Outlook.Row 
 Dim oTable As Outlook.Table 
 Dim oFolder As Outlook.Folder 
 
 'Get a Folder object for the Inbox 
 Set oFolder = Application.Session.GetDefaultFolder(olFolderInbox) 
 
 'Define Filter to obtain items last modified after May 1, 2005 
 Filter = "[LastModificationTime] > '5/1/2005'" 
 'Restrict with Filter 
 Set oTable = oFolder.GetTable(Filter) 
 
 'Enumerate the table using test for EndOfTable 
 Do Until (oTable.EndOfTable) 
 Set oRow = oTable.GetNextRow() 
 Debug.Print (oRow("Subject")) 
 Debug.Print (oRow("LastModificationTime")) 
 Loop 
End Sub

Voir aussi

Objet Row

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.