Kevin vpraša,
Imam nabor podatkov, ki so shranjeni v besedilni datoteki, ločeni z zavihki. Nekatere informacije morajo obdržati "oblazinjenje" - na primer poštne številke (dolge morajo biti 5 ali 9 znakov). Ko se besedilna datoteka odpre v Excelu, se samodejno odpre čarovnik za uvoz besedila. Obstaja možnost, da določite, da je stolpec, ki vsebuje te podatke, besedilo in ne splošni. Izbira te možnosti deluje - vendar zahteva, da odpiram ročno. V VBA nisem uspel najti načina, da bi bile informacije besedilo namesto splošne - in shranil svoje "oblazinjenje".
Vklopite snemalnik makrov in zabeležite postopek uvoza besedilne datoteke. Tu je nastala koda:
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:=TrueParameter FieldInfo nadzoruje način uvoza posameznega polja. V tem primeru je snemalnik makrov ugotovil, da imate 4 polja. Vnos Array (2, 1) pravi, da za 2. polje uporabite vrsto polja »General«. Upoštevajte, da je za polje 3 vnos Array (3, 2). "2" je koda za Excel, da to polje uvozi kot Besedilo.
