Процитируя себя.
"Как открыть текстовый файл, в идеале любой, в реале с разделителями."
Мы рассматриваем самый примитивный случай - текстовые файлы с разделителями.
Бывает ещё SDF - с колонками фиксированной ширины.
При открытии таких файлов, Эксцель что то из себя пытается изобразить, но получается у него хреновато.
Состязаться с Эксцелем в области открытия SDF текстовых файлов мне не по уму.
Думаю только, что можно написать алгоритм, более совершенный чем у Эксцеля.
Вернёмся к файлам с разделителями. Тут намного проще, хоть и не тривиально на моём уровне, но решаемо.

Вчера недосуг было, суета. Сегодня решил посмотреть, как это Вам удалось так ловко победить. Нашёл:
FieldInfo:=Array(Array(1, 2), Array(2, 2))
Только если колонка со счётом будет третьей, фокус не получится.
Таким путём я ходил.
FieldInfo:=Array( _
 Array(1, 2), Array(2, 2), Array(3, 2), Array(4, 2), Array(5, 2), Array(6, 2), Array(7, 2), Array(8, 2), Array(9, 2), Array(10, 2), _
 Array(11, 2), Array(12, 2), Array(13, 2), Array(14, 2), Array(15, 2), Array(16, 2), Array(17, 2), Array(18, 2), Array(19, 2), Array(20, 2), _
 Array(21, 2), Array(22, 2), Array(23, 2), Array(24, 2), Array(25, 2), Array(26, 2), Array(27, 2), Array(28, 2), Array(29, 2), Array(30, 2), _
 Array(31, 2), Array(32, 2), Array(33, 2), Array(34, 2), Array(35, 2), Array(36, 2), Array(37, 2), Array(38, 2), Array(39, 2), Array(40, 2), _
 Array(41, 2), Array(42, 2), Array(43, 2), Array(44, 2), Array(45, 2), Array(46, 2), Array(47, 2), Array(48, 2), Array(49, 2), Array(50, 2) _
 )
То есть заведомо объявить все колонки текстовыми. Но возникли проблемы с числовыми колонками. После открытия файла они наотрез отказывались переопределяться в числовые.
Остаётся, только, перед открытием текста проанализировать, где какие колонки, сформировать массив и передать его в FieldInfo.
С пивом барышням придётся подождать.

Извините, коль что не так. Сами мы не местные, к здешним порядкам не приученные.
А такой лаконизм вызван экономией дискового пространства?

Это не решение, это сказка. Ведро пива, думаю, мои очаровашки выкатят.
За вычетом моих комиссионных, восемь литров Ваши.
Хорошо бы ещё воткнуть всё это в метод Workbook_Open, а после открытия нужного текста что бы файл с макросом самозакрывался.
Ну, на это моих познаний в VBA хватит, допилю

Что то я намутил тут.  Ваша правда, вопрос простой. Как открыть текстовый файл, в идеале любой, в реале с разделителями, при этом не прибегая к лишним телодвижениям.
Подобная полезность есть - WinPrn, но она обрабатывает тексты с псевдографикой.

Чо то не пойму, куда я попал? На КВН чтоль?
Ребята. Ну откройте ужасный файл в Эксцеле. Потом сравните с txt.
Наберусь смелости дать тот же совет представленным здесь девчатам.
Первый топик на эту тему на Вашей планете возник аж в 2007-м лохматом году. Воз и ныне там.

 

Именно так. Не правильно поняли.

Вы не правы. Нули, как раз, правые.  

Так это потом. Откройте ужасный файл в Эксцеле, объявив при открытии колонку с суммой текстовой.
А после того посуммируйте. А этот противный Эксцель скажет Вам: фигужки.

Вот она, ужасная.
Разделитель-табуляция.

Вопрос здесь озвучен, ответа не нашёл.
Часто приходится открывать текстовые файлы с банковскими счетами. Да и юзершей обучаю этому нелёгкому делу.
Вместо хвостика счёта наблюдаем 5 нулей, если колонку в диалоге открытия не объявить текстовой.
Надоела мне эта бодяга. Слепил макрос, который открывает файл и заведомо объявляет все колонки текстовыми.
А заодно и кодовую страницу задаёт нашу, родную, а не китайскую, которую Эксцель пытается впарить.
Даже порадовался немного, пока не обнаружил, что всамделишние числовые колонки наотрез отказываются суммироваться.
Тоска. Блеск и нищета. Проблема существует столько, сколько сам Эксцель. И ни с места.

Накопал готовую к употреблению.
http://www.planetaexcel.ru/forum/?PAGE_NAME=read&FID=8&TID=729

Бабка круассанчиков напекла: внучка в гости собирается.
А деду светит лаба по базам данных. Надеюсь тут буду выступать более достойно.
Спасибо за сочуствие.

Наглядно. Хорошобы ещё для УНИК формулу прикрутить.
Догадываюсь, что намекнёте на пост. Только эти намёки не для моего уровня.
Мне бы что нибудь на уровня полуфабриката, так что бы в печку, и можно есть.

Приходит внучка. Подкормилась малость у бабки, а потом к деду:  давай лабу делать.
Дед сам из айтишников будет, но в формулах эксцеля мои познания дальше суммы не простираются.
Тем не менее продвинулись мы неплохо, пока не дошло до этой колонки.
Эта табличка - баллы, набранные абитурами. Данных об их весе и возрасте нет. Фотофиниш приёмная комиссия не применяет.
Пока топчусь на месте.

За равное количество очков одинаковое место

Всё бы хорошо. Вот только получается, что набравшие по тринадцать очков получают первое и второе место.
Обидно тому, кто второе место получит.

Здравствуйте
В прикреплённом примере нет второго места: есть первое, а потом сразу третье.
Горю синим пламенем.  Как быть?