Разбить ряд на количество цифр

[valerij]

Всем привет.
Подскажите!!!!!!
У меня есть массив 16-ричных чисел в таком виде их очень много, привожу часть из массива:
AEF501000100920FF9F201000100A80F47F 001000100BD0F99ED01000100D30FEEEA01 000100E90F48E8010001000010A4E501000 100161005E3010001002C1069E001000100 43
Как этот массив разбить по 16 элементов в любом столбце, вот так.

AEF501000100920F
F9F201000100A80F

Спасибо.

[Казанский]

Данные - текст по столбцам - фиксированной ширины...

[valerij]

Сообщение от Казанский

Данные - текст по столбцам - фиксированной ширины...

Да.
С WinHex копирую блок - 16-ричных чисел, вставляю в Эксель, скажем в А1, запускаю в ручную макрос и получаю столбец данных - А-А по 16 элементов в строке.
Могу приложить текстовый файл с данными.

[IgorGO]

Sub Split16()
  Dim r As Long
  For r = Len(Cells(1, 1)) / 16 - 1 To 0 Step -1
    Cells(r + 1, 1) = Mid(Cells(1, 1), r * 16 + 1, 16)
  Next
End Sub

[valerij]

Сообщение от IgorGO

Sub Split16()
  Dim r As Long
  For r = Len(Cells(1, 1)) / 16 - 1 To 0 Step -1
    Cells(r + 1, 1) = Mid(Cells(1, 1), r * 16 + 1, 16)
  Next
End Sub

Всё ОК!!
Правда перед вставкой ряда, должен столбец А-А форматировать как текстовый, но это мелочи.

Спасибо.