共用方式為


Outlook) (Folder.GetTable 方法

取得 Table 物件,其中包含依 Filter篩選的專案。

語法

expressionGetTable( _Filter_ , _TableContents_ )

表達 代表 'Folder' 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Filter 選用 字串 Microsoft Jet 或 DAV 搜尋和尋找 DASL 中的篩選 () 語法,指定父 資料夾中專案的準則。
TableContents 選用 OlTableContents 會指定 GetTable 所傳回資料夾中的項目類型。 預設值為 olUserItems

傳回值

Table,其中包含上層 Folder 中,符合 Filter 中準則的項目。 根據預設,TableContentsolUserItems,而且傳回的 Table 僅包含非隱藏的已篩選項目。

註解

如果 Filter 是空白字串或省略 Filter 參數,GetTable 就會傳回 Table,其中各列表示 Folder 中的所有項目。 如果 Filter 是空白字串或省略 Filter 參數,而且 TableContentsolHiddenItemsGetTable 便會傳回 Table,其中各列表示 Folder 中的所有隱藏項目。

如需篩選的詳細資訊,請參閱依命名空間 篩選項目參考屬性

GetTable 會使用上層 Folder 之資料夾類型的預設欄設定,傳回 Table。 若要修改預設資料行集,請使用Columns集合物件的AddRemoveRemoveAll方法。 當 TableContentsolHiddenItems 時,即使上層 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

另請參閱

Folder 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應