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


Метод Items.SetColumns (Outlook)

Кэширует определенные свойства для чрезвычайно быстрого доступа к этим конкретным свойствам каждого элемента в коллекции Items .

Синтаксис

выражение. SetColumns( _Columns_ )

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
Columns Обязательный String Строка, содержащая имена свойств для кэширования. Имена свойств разделяются запятыми в этой строке.

Замечания

Метод SetColumns полезен для перебора коллекции Items . Если этот метод не используется, Microsoft Outlook должен открыть каждый элемент для доступа к свойству. С помощью метода SetColumns Outlook проверяет только кэшированные свойства и обеспечивает быстрый доступ только для чтения к этим свойствам.

После применения метода SetColumns к определенным свойствам коллекции вы не сможете прочитать другие свойства этой коллекции. свойства, которые не кэшируются, возвращаются пустыми. Вы также не можете выполнить запись ни в одно из свойств этой коллекции. Кроме того, если требуется быстрый доступ к набору элементов для чтения и записи, используйте объект Table .

Метод SetColumns нельзя использовать и вызовет ошибку с любым свойством, возвращающим объект. Его нельзя использовать со следующими свойствами:

AutoResolvedWinner InternetCodePage
BodyFormat MemberCount
Categories ReceivedByEntryID
Детей ReceivedOnBehalfOfEntryID
Class RecurrenceState
Companies ReplyRecipients
DLName ResponseState
DownloadState Saved
EntryID Sent
HTMLBody Submitted
IsConflict VotingOptions

Свойство ConversationIndex нельзя кэшировать с помощью метода SetColumns . Однако это свойство не приведет к ошибке, аналогичной другим свойствам, перечисленным выше.

Пример

В следующем примере Visual Basic для приложений (VBA) коллекция Items используется для получения элементов в папке Задач по умолчанию, кэширует свойства Subject и DueDate, а затем по очереди отображает тему и даты выполнения.

Sub SortByDueDate() 
 
 Dim myNameSpace As Outlook.NameSpace 
 
 Dim myFolder As Outlook.Folder 
 
 Dim myItem As Object 
 
 Dim myItems As Outlook.Items 
 
 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 
 Set myFolder = myNameSpace.GetDefaultFolder(olFolderTasks) 
 
 Set myItems = myFolder.Items 
 
 myItems.SetColumns ("Subject, DueDate") 
 
 For Each myItem In myItems 
 
 MsgBox myItem.Subject & " " & myItem.DueDate 
 
 Next myItem 
 
End Sub

См. также

Объект Items

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

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