заполнение таблиц со столбика

[Serj-kot]

Помогите решить задачку.
Прибор регистрирует 4 параметра и пишет их в тхт- файл одним столбиком. Открываем файл екселем и надо эти 4 параметры разнести по разным столбикам для дальнейшей обработки (построение графиком, поиск мин. и макс. значений и тд.).
Собсно нужен код макроса, помогите написать, пожалуйста.

[alibek]

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

Do
  ...
  col = col + 1
  If col > 4 Then
    col = 1
    row = row + 1
  End If
  ...
Loop

[Serj-kot]

Спасибо.
Если не трудно, распишите что куда, так как в програмировании не силён, но очень нужно решить эту проблему. Спасибо.

[alibek]

Что именно расписать?
Это прототип того, как можно четыре последовательные строки преобразовать в четыре столбца. В переменной col будет содержаться номер столбца, в переменной row будет содержаться номер строки.
Если ты загружаешь в лист Excel, то для переноса данных указываешь Cells(row,col).Value = V, где в V хранится считанная из файла строка.

[Serj-kot]

Дело в том что впринципе я разобрался как работает Ваш прототип, но так как я не рублю в програмировании, но пытаюсь разобратся, я не знаю как его вставить в макрос.
Если по алгоритму, то здачу я могу описать так:
Создть макрос, который в открытом файле
проверяет количество заполненых строк в столбце
из этого столбца делает уже это

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

Do
  ...
  col = col + 1
  If col > 4 Then
    col = 1
    row = row + 1
  End If
  ...
Loop

Очень прошу помочь, так как невыносимо это делать вручную по 10 раз в день.