Teilen über


Table.GetArray-Methode (Outlook)

Es wird ein zweidimensionales Array abgerufen, das einen Satz Zeilen- und Spaltenwerte aus dem Table -Objekt enthält.

Syntax

Ausdruck. GetArray( _MaxRows_ )

Ausdruck Eine Variable, die ein Table-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
MaxRows Erforderlich Long Gibt die maximale Anzahl von Zeilen aus der Tabelle zurückgegeben.

Rückgabewert

Ein Variant-Wert , bei dem es sich um ein zweidimensionales Array handelt, das eine Reihe von Zeilen- und Spaltenwerten aus der Tabelle darstellt. Das Array ist nullbasiert. Ein Arrayindex (i, j) indizes in der i-ten Spalte und j-ten Zeile im Array. Spalten im Array entsprechen Spalten in der Tabelle, und Zeilen im Array entsprechen Zeilen in der Tabelle. Die Anzahl der Zeilen im zurückgegebenen Array ist der geringere Wert von MaxRows und die tatsächliche Anzahl der Zeilen in der Tabelle.

Hinweise

GetArray -Methode bietet einen einfachen Prinzip bedeutet, dass beim Abrufen von Werten aus einer Tabelle, indem alle oder einen Teil der Daten in der Tabelle (basierend auf der aktuellen Zeile) auf ein Array kopiert und im Array.

GetArray beginnt immer bei der aktuellen Zeile der Tabelle. Es wird ein Array mit maxRows-Zeilenanzahl zurückgegeben, wenn mindestens MaxRows-Zeilenanzahl in der Tabelle vorhanden ist, die an der aktuellen Position beginnt. Wenn MaxRows nicht größer als die Gesamtanzahl der Zeilen in der Tabelle ist und die Anzahl der Elemente in der Tabelle ab der aktuellen Zeile kleiner als MaxRows ist, wird ein Array zurückgegeben, das nur die verbleibenden Zeilen in der Tabelle enthält. Wenn GetArray aufgerufen wird und keine verbleibenden Zeilen vorhanden sind, gibt GetArray ein leeres Array mit 0 Elementen zurück.

Nach dem Abrufen der entsprechenden Zeilen aus der Tabelle und vor der Rückgabe, verschiebt GetArray immer die aktuelle Zeile in die nächste Zeile in der Tabelle, wenn eine nächste Zeile vorhanden. GetArray(n) arbeitet, als ob Table.GetNextRow n aufgerufen wird Zeiten.

Die Werte in den Spalten Zuordnen von Spalten in der Tabelle, und werden daher durch das Format des der Name der Eigenschaft für die Spalte verwendet bestimmt. Weitere Informationen finden Sie unter Faktoren, die sich auf die Darstellung von Eigenschaftswerten in den Klassen 'Table' und 'View' auswirken.

Beispiel

Im folgenden Codebeispiel ruft eine Tabelle von Filtern für alle Elemente im Posteingang, die im Betreff "Office" enthalten. Anschließend wird die Table.GetArray -Methode verwendet, um die Daten aus der Tabelle in ein Array kopieren und druckt den Wert der Eigenschaft der einzelnen zurückgegebenen Elemente.

Weitere Informationen zum Angeben von Eigenschaftsnamen in einem Filter durch Namespaceverweise finden Sie unter Verweisen auf Eigenschaften mithilfe von Namespaces.

Sub DemoTableUsingGetArray() 
 'Declarations 
 Dim Filter As String 
 Dim i, ubRows As Long 
 Dim j, ubCols As Integer 
 Dim varArray 
 Dim oTable As Outlook.Table 
 Dim oFolder As Outlook.Folder 
 Const SchemaPropTag As String = _ 
 "http://schemas.microsoft.com/mapi/proptag/" 
 
 On Error Resume Next 
 'Get a Folder object for the Inbox 
 Set oFolder = Application.Session.GetDefaultFolder(olFolderInbox) 
 'Filter on the subject containing "Office" 
 Filter = "@SQL=" & Chr(34) & SchemaPropTag & "0x0037001E" _ 
 & Chr(34) & " like '%Office%'" 
 'Get all items in Inbox that meet the filter 
 Set oTable = oFolder.GetTable(Filter) 
 
 On Error GoTo Err_Trap 
 varArray = oTable.GetArray(oTable.GetRowCount) 
 
 'Number of rows is the second dimension of the array 
 ubRows = UBound(varArray, 2) 
 'Number of columns is the first dimension of the array 
 ubCols = UBound(varArray) 
 
 'Array is zero-based 
 'Rows corrspond to items in the table, so for each item... 
 For j = 0 To ubRows 
 'Columns correspond to properties in the table, print the value of each property 
 For i = 0 To ubCols 
 Debug.Print varArray(i, j) 
 Next 
 Next 
 Exit Sub 
 
Err_Trap: 
 Debug.Print "Error#:" & Err.Number & " Desc: " & Err.Description 
 Resume Next 
End Sub

Siehe auch

Table-Objekt

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.