чтение текстового файла..

[batiq]

допустим, текстовый файл содержит значения а, в и с (без всяких разделителей).. как прочесть эти данные?

1574985463248687
\_____/\___/\____/
....\/.......\/......\/....
....а........в.......с....

[uhm]

В эксель прочеcть, или куда?
Если в эксель, а все числа фиксированной ширины, используй импорт файла с параметром "поля фиксированной ширины".

[batiq]

проблема в том, что переменные фиксированной ширины, да только отличаются на каждой стстроке..

пример:
aaaaaaaabbbbbbccccdddddddd
eeeeffffffffffffffffffffgggggghhhh

в excel ширина столбца указывается от указаной строки и до конца..

в паскале делается так:

a: string[8];
b: string[6];
c: string[4];
d: string[7];
...
h: string[4];

read(inputfile, a,b,c,d,e,f,g,h)

что-то подобное можно осуществить в vba?

[uhm]

А ты знаешь ширину каждой переменной в каждой строке? Если да, то читай файл по строчкам, а потом используй Mid$ для чтения отдельных переменных.

[IvanSh]

а если попробовать так

Код: Выделить всё

Type mType
    a As String * 8
    b As String * 6
    c As String * 4
    d As String * 8
    ns As String * 2
    e As String * 4
    f As String * 20
    g As String * 6
    h As String * 4
End Type

Dim m As mType

Private Sub Command1_Click()
    Dim fNum As Long
    fNum = FreeFile
    Open "c:\1.txt" For Binary As #fNum
    Get #fNum, , m
    Close #fNum
End Sub


здесь переменная ns это символ новой строки