Кевин пита,
Имам скуп података који се чувају у текстуалној датотеци одвојеној картицама. Неке информације треба да задрже „попуњавање“ - попут поштанских бројева (морају да имају 5 или 9 знакова). Када се текстуална датотека отвори у екцелу, аутоматски се појављује чаробњак за увоз текста. Постоји могућност да одредите да је колона која садржи те податке Текст, а не Општи. Одабир ове опције делује - али захтева да ручно отворим. Нисам успео да пронађем начин у ВБА да информације буду текстуалне, а не опште - и да сачувам своје „додавање“.
Укључите макро снимач и забележите процес увоза ваше текстуалне датотеке. Ево резултујућег кода:
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:=TrueПараметар ФиелдИнфо контролише начин увоза сваког поља. У овом случају, макро снимач је приметио да имате 4 поља. Унос Арраи (2, 1) каже да за друго поље користите тип поља „Генерал“. Имајте на уму да је за поље 3 унос Арраи (3, 2). „2“ је код за Екцел да увози ово поље као Текст.
