QueryTable.TextFileColumnDataTypes-Eigenschaft (Excel)

Gibt eine geordnete Matrix von Konstanten zurück oder legt diese fest, die die Datentypen angeben, die den entsprechenden Spalten in der Textdatei zugewiesen wurden, die in eine Abfragetabelle importiert wird. Die Standardkonstante für jede Spalte lautet xlGeneral. Variant-Wert mit Lese-/Schreibzugriff.

Syntax

Ausdruck. TextFileColumnDataTypes

Ausdruck Eine Variable, die ein QueryTable-Objekt darstellt.

Hinweise

Verwenden Sie die XlColumnDataType-Konstanten , um die verwendeten Spaltendatentypen oder die während des Datenimports ausgeführten Aktionen anzugeben.

Verwenden Sie diese Eigenschaft nur, wenn Ihre Abfragetabelle auf Daten aus einer Textdatei basiert (wobei die QueryType-Eigenschaft auf xlTextImport festgelegt ist).

Wenn Sie mehr Elemente im Array angeben, als Spalten vorhanden sind, werden diese Werte ignoriert.

Verwenden Sie xlEMDFormat nur, wenn die Sprachunterstützung für Taiwan installiert und aktiviert ist. Die xlEMDFormat-Konstante gibt an, dass Kalenderangaben gemäß dem Taiwanesischen Kalender verwendet werden sollen.

Wenn Sie Daten über die Benutzeroberfläche importieren, werden Daten aus einer Webabfrage oder einer Textabfrage als QueryTable-Objekt importiert, während alle anderen externen Daten als ListObject-Objekt importiert werden.

Wenn Sie Daten mithilfe des Objektmodells importieren, müssen Daten aus einer Webabfrage oder einer Textabfrage als QueryTable importiert werden, während alle anderen externen Daten entweder als ListObject oder als QueryTable importiert werden können.

Die TextFileColumnDataTypes-Eigenschaft gilt nur für QueryTable-Objekte.

Beispiel

In diesem Beispiel wird eine Textdatei mit fester Breite in eine neue Abfragetabelle auf dem ersten Arbeitsblatt der ersten Arbeitsmappe importiert. Die erste Spalte in der Textdatei ist fünf Zeichen breit und wird als Text importiert. Die zweite Spalte ist vier Zeichen breit und wird übersprungen. Der Rest der Textdatei wird in die dritte Spalte importiert und erhält dabei das Standardformat.

Set shFirstQtr = Workbooks(1).Worksheets(1) 
Set qtQtrResults = shFirstQtr.QueryTables _ 
 .Add(Connection := "TEXT;C:\My Documents\19980331.txt", _ 
 Destination := shFirstQtr.Cells(1, 1)) 
With qtQtrResults 
 .TextFileParseType = xlFixedWidth 
 .TextFileFixedColumnWidths = Array(5, 4) 
 .TextFileColumnDataTypes = _ 
 Array(xlTextFormat, xlSkipColumn, xlGeneralFormat) 
 .Refresh 
End With

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.