Поделиться через


Метод Row.Item (Outlook)

Получает объект Object , представляющий значение для объекта Row в столбце, указанном индексом.

Синтаксис

expression. Item (Index)

Выражение Переменная, представляющая объект Row .

Параметры

Имя Обязательный или необязательный Тип данных Описание
Индекс; Обязательный Variant Значение индекса из 1, которое может быть длинным , представляющим индекс столбца для коллекции Columns , или строкой , представляющей имястолбца.

Возвращаемое значение

Тип Variant, представляющий значение свойства (как указано в индексе ) элемента (как указано в родительской строке).

Замечания

Метод Item является методом по умолчанию объекта Row , что означает, что метод можно использовать неявно. Следующие две строки кода обращаются к значению свойства Subject в указанной строкетаблицы :

Row.Item("Subject")

Row("Subject")

Если столбец добавлен в таблицу с помощью имени свойства, ссылающегося на пространство имен, необходимо ссылаться на Столбец в методе Row.Item той же ссылкой на пространство имен. Если вы используете явную встроенную ссылку на имя в Row.Item, вы получите сообщение об ошибке.

Пример

В следующем примере кода показано, как получить объект Table на основе LastModificationTime элементов в папке "Входящие". Затем он перечисляет и выводит значения нескольких свойств по умолчанию этих элементов. Так как метод Item является методом по умолчанию объекта Row , он использует метод Item неявным способом.

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

См. также

Объект Row

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.