Outlook) (Folder.GetTable 方法
取得 Table 物件,其中包含依 Filter篩選的專案。
語法
expression。 GetTable
( _Filter_
, _TableContents_
)
表達 代表 'Folder' 物件的變數。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
Filter | 選用 | 字串 | Microsoft Jet 或 DAV 搜尋和尋找 DASL 中的篩選 () 語法,指定父 資料夾中專案的準則。 |
TableContents | 選用 | OlTableContents | 會指定 GetTable 所傳回資料夾中的項目類型。 預設值為 olUserItems。 |
傳回值
Table,其中包含上層 Folder 中,符合 Filter 中準則的項目。 根據預設,TableContents 為 olUserItems,而且傳回的 Table 僅包含非隱藏的已篩選項目。
註解
如果 Filter 是空白字串或省略 Filter 參數,GetTable 就會傳回 Table,其中各列表示 Folder 中的所有項目。 如果 Filter 是空白字串或省略 Filter 參數,而且 TableContents 為 olHiddenItems,GetTable 便會傳回 Table,其中各列表示 Folder 中的所有隱藏項目。
如需篩選的詳細資訊,請參閱依命名空間 篩選項目 和 參考屬性。
GetTable 會使用上層 Folder 之資料夾類型的預設欄設定,傳回 Table。 若要修改預設資料行集,請使用Columns集合物件的Add、Remove或RemoveAll方法。 當 TableContents 為 olHiddenItems 時,即使上層 Folder 可能是 [連絡人] 資料夾,預設欄位設定一定會是郵件資料夾的預設欄設定。 如需預設欄位設定的詳細資訊,請參閱 Table 物件中顯示的預設屬性。
使用Table.Restrict將後續篩選套用至以Folder物件為基礎的Table。
範例
下列程式碼範例說明如何使用 Folder.GetTable 以根據 [收件匣] 中項目的 LastModificationTime,取得 Table 物件。 然後,範例還會列舉並列印這些項目的一些預設屬性值。
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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。