Método Folder.GetTable (Outlook)

Obtém um objeto Table que contém itens filtrados pelo Filter.

Sintaxe

expression. GetTable( _Filter_ , _TableContents_ )

Expressão Uma variável que representa um objeto 'Folder'.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Filtro	Opcional	String	Um filtro na sintaxe DASL (Pesquisa e Localização do Microsoft Jet ou DAV) que especifica os critérios para itens na Pasta pai.
TableContents	Opcional	OlTableContents	Especifica o tipo de itens na pasta que GetTable retorna. O padrão é olUserItems.

Valor de retorno

Um objeto Table que contém itens no objeto Folder pai que satisfaz os critérios em Filter. Por padrão, TableContents é olUserItems e o objeto Table retornado contém somente os itens filtrados que não estão ocultos.

Comentários

Se Filter for uma cadeia de caracteres em branco ou o parâmetro Filter for omitido, GetTable retornará uma Tabela com linhas que representam todos os itens da Pasta. Se Filter for uma cadeia de caracteres em branco ou o parâmetro Filter for omitido e TableContents for olHiddenItems, GetTable retornará uma Tabela com linhas que representam todos os itens ocultos na Pasta.

Para obter mais informações sobre filtros, consulte Filtrando itens e referenciando propriedades por namespace.

GetTable retorna uma tabela com a coluna padrão definido para o tipo de pasta da pasta pai. Para modificar o conjunto de coluna padrão, use os métodos Add, Remove ou RemoveAll do objeto da coleção Columns. Quando TableContents é olHiddenItems, o conjunto de colunas padrão é sempre o conjunto de colunas padrão para uma pasta de email, embora a pasta pai possa ser, por exemplo, uma pasta Contatos. Para obter mais informações sobre conjuntos de colunas padrão, consulte Propriedades padrão exibidas em um objeto Table.

Use Table.Restrict para aplicar filtros subsequentes a uma Tabela baseada no objeto Folder .

Exemplo

O exemplo de código a seguir ilustra como usar GetTable para obter um objeto Table com base no LastModificationTime dos itens na caixa de entrada. Em seguida, ele enumera e imprime os valores de algumas propriedades padrão desses itens.

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

Confira também

Objeto Folder

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.