Kevin fragt:
Ich habe eine Reihe von Daten, die in einer tabulatorgetrennten Textdatei gespeichert sind. Einige der Informationen müssen die „Auffüllung“ beibehalten, z. B. Postleitzahlen (sie müssen 5 oder 9 Zeichen lang sein). Wenn die Textdatei in Excel geöffnet wird, wird der Textimport-Assistent automatisch gestartet. Es gibt eine Option, mit der angegeben werden kann, dass die Spalte mit diesen Daten eher Text als generisch ist. Die Auswahl dieser Option funktioniert - ich muss das Öffnen jedoch manuell durchführen. Ich konnte in VBA keine Möglichkeit finden, die Informationen eher als Text als als generisch zu verwenden - und meine "Auffüllung" zu speichern.
Schalten Sie den Makrorecorder ein und zeichnen Sie den Importvorgang Ihrer Textdatei auf. Hier ist der resultierende Code:
Workbooks.OpenText Filename:= “C:TestData.txt”, Origin:=437, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 2), Array(4, 1)), TrailingMinusNumbers:=TrueDer Parameter FieldInfo steuert, wie jedes Feld importiert wird. In diesem Fall hat der Makrorecorder festgestellt, dass Sie 4 Felder haben. Der Eintrag Array (2, 1) besagt, dass für das 2. Feld ein Feldtyp "Allgemein" verwendet wird. Beachten Sie, dass für Feld 3 der Eintrag Array (3, 2) lautet. Die "2" ist der Code für Excel, um dieses Feld als Text zu importieren.
