Row.Item-Methode (Outlook)
Es wird ein Object-Objekt abgerufen, das den Wert für das Row-Objekt in der durch Index angegebenen Spalte darstellt.
Syntax
expression.Item (Index)
Ausdruck Eine Variable, die ein Row-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Index | Erforderlich | Variant | Ein 1-basierter Indexwert, der Wert entweder einen langen den Spaltenindex für die Columns -Auflistung oder eine Zeichenfolge zur Darstellung der Name der Spalte sein kann. |
Rückgabewert
Ein Variant-Wert , der den Wert einer Eigenschaft (wie durch Index angegeben) eines Elements darstellt (wie in der übergeordneten Zeile angegeben).
Hinweise
Die Item -Methode ist die standardmäßige-Methode des Row -Objekts, was bedeutet, dass die Methode implizit verwendet werden kann. Die folgenden beiden Codezeilen greifen auf den Wert der Subject-Eigenschaft an der angegebenen Zeile in einer Tabelle zu:
Row.Item("Subject")
Row("Subject")
Wenn eine Spalte in einer Tabelle, die über einen Eigenschaftennamen verweisen auf ein Namespace hinzugefügt wurde, müssen Sie die Spalte in der Row.Item -Methode durch den gleichen Namespaceverweis verweisen. Wenn Sie einen expliziten integrierten Namensverweis in Row.Item verwenden, erhalten Sie eine Fehlermeldung.
Beispiel
Das folgende Codebeispiel veranschaulicht, wie ein Table -Objekt basierend auf der LastModificationTime von Elementen im Posteingang zu erhalten. Anschließend aufgelistet und die Werte von ein Paar von Standardeigenschaften dieser Elemente ausgegeben. Da die Item -Methode die Standardmethode des Row -Objekts ist, wird implizit die Item -Methode verwendet.
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
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.