Método Row.Item (Outlook)
Obtém um Object que representa o valor do objeto Row na coluna especificada por Index.
expressão. Item (Índice)
Expressão Uma variável que representa um objeto Row .
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Índice | Obrigatório | Variant | Um valor de índice baseado em 1 que pode ser um Long representando o índice de coluna do conjunto Columns ou uma cadeia de caracteres representando o nome da coluna. |
Uma Variant que representa o valor de uma propriedade (conforme especificado por Index ) de um item (conforme especificado pela linha pai).
O método Item é o método padrão do objeto Row, que significa que o método implicitamente pode ser usado. As duas linhas de código a seguir acessam o valor da propriedade Subject na linha especificada em uma tabela :
Row.Item("Subject")
Row("Subject")
Caso tenha sido adicionado a uma coluna em uma tabela usando um nome de propriedade referência a um namespace, você deve fazer referência a coluna no método Row.Item pela referência mesmo namespace. Se você usar uma referência de nome interna explícita em Row.Item, receberá um erro.
O exemplo de código a seguir ilustra como 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. Uma vez que o método Item é o método padrão do objeto Row, ele usa o método Item de uma forma implícita.
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
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.