Spørger Kevin,
Jeg har et sæt data, der er gemt i en fanebladet tekstfil. Nogle af oplysningerne skal bevare "polstringen" - f.eks. Postnummer (de skal være 5 eller 9 tegn lange). Når tekstfilen åbnes i Excel, kommer guiden Tekstimport automatisk op. Der er en mulighed for at specificere, at kolonnen, der indeholder disse data, er tekst snarere end generisk. At vælge denne indstilling fungerer - men det kræver, at jeg åbner manuelt. Jeg har ikke været i stand til at finde en måde i VBA at få oplysningerne til at være tekst snarere end generiske - og gemme min 'polstring'.
Tænd for makrooptageren, og registrer processen med at importere din tekstfil. Her er den resulterende kode:
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:=TrueFieldInfo-parameteren styrer, hvordan hvert felt importeres. I dette tilfælde bemærkede makrooptageren, at du har 4 felter. Posten Array (2, 1) siger, at i det andet felt skal du bruge en "Generel" felttype. Bemærk, at for felt 3 er posten Array (3, 2). “2” er koden for Excel til at importere dette felt som tekst.
