Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.02.2010, 18:27   #1
xxxxx0111
Пользователь
 
Регистрация: 08.02.2010
Сообщений: 18
По умолчанию импортирование txt

Есть txt файл, который необходимо импортировать в Excel при помощи VBA, так, чтобы данные приняли форму, и с ними возможно было бы работать в Excel.
Вложения
Тип файла: txt DOC61.TXT (35.4 Кб, 170 просмотров)
xxxxx0111 вне форума Ответить с цитированием
Старый 10.02.2010, 18:34   #2
tae1980
Форумчанин
 
Регистрация: 02.02.2009
Сообщений: 842
По умолчанию

Боюсь что без значительной ручной обработки, "работать" с подобным файлом ни как нельзя. Не только в VBA но и в любом другом языке программирования.
С уважением, Алексей.
tae1980 вне форума Ответить с цитированием
Старый 10.02.2010, 18:35   #3
xxxxx0111
Пользователь
 
Регистрация: 08.02.2010
Сообщений: 18
По умолчанию

Какого рода должна быть обработка? Т.е. что удалить, если да, то что?
xxxxx0111 вне форума Ответить с цитированием
Старый 10.02.2010, 18:39   #4
tae1980
Форумчанин
 
Регистрация: 02.02.2009
Сообщений: 842
По умолчанию

Необходимо удалить все лишнее, оставить только таблица. Да и таблицы не плохо бы сильно подправить, как минимум убрать все рамки. Рамки конечно не такая уж большая проблема, но крови попить могут.

Я бы внимательно изучил программу которая формирует данный документ. Скорее всего она может выдать данные в не обработанном виде, или можно напрямую покопаться в ее базе данных.
С уважением, Алексей.
tae1980 вне форума Ответить с цитированием
Старый 10.02.2010, 18:43   #5
xxxxx0111
Пользователь
 
Регистрация: 08.02.2010
Сообщений: 18
По умолчанию

Цитата:
Сообщение от tae1980 Посмотреть сообщение
Необходимо удалить все лишнее, оставить только таблица. Да и таблицы не плохо бы сильно подправить, как минимум убрать все рамки. Рамки конечно не такая уж большая проблема, но крови попить могут.

Я бы внимательно изучил программу которая формирует данный документ. Скорее всего она может выдать данные в не обработанном виде, или можно напрямую покопаться в ее базе данных.
К сожалению такой программы у меня нет, данные в необработанном виде есть, но там ВООБЩЕ НЕТ таблиц, а только числовые параметры, передаваемые программе.
xxxxx0111 вне форума Ответить с цитированием
Старый 10.02.2010, 18:47   #6
tae1980
Форумчанин
 
Регистрация: 02.02.2009
Сообщений: 842
По умолчанию

Цитата:
Сообщение от xxxxx0111 Посмотреть сообщение
К сожалению такой программы у меня нет, данные в необработанном виде есть, но там ВООБЩЕ НЕТ таблиц, а только числовые параметры, передаваемые программе.
Ну вот и замечательно...
Нужно всего лишь понять структура хранение необработанных данных и реализовать ее обработку в VBA. Для этого нужно очень хорошо понимать что из себя представляют данные, и что нужно получить в итоге. Но работа довольно тривиальная.
С уважением, Алексей.
tae1980 вне форума Ответить с цитированием
Старый 10.02.2010, 19:04   #7
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Если таких файлов (как тот, что прикреплён к первому посту) много - то можно и макрос написать.

Алгоритм не очень сложный:
  • Открываем файл TXT при помощи Microsoft Word (который сам распознает кодировку)
  • Средствами Word: выделяем текст, жмём в меню Преобразовать текст в таблицу, в качестве разделителя столбцов ставим символ "|", удаляем из файла все символы псевдографики
  • все полученные таблицы переносим из Word в Excel
  • Удаляем лишние строки, форматируем таблицу
  • Обрабатываем данные

Вот пример того, что можно получить:



Если очень надо, могу попробовать сделать такой макрос (но не бесплатно - работы много)
EducatedFool вне форума Ответить с цитированием
Старый 10.02.2010, 19:06   #8
alex77755
Форумчанин
 
Аватар для alex77755
 
Регистрация: 14.02.2009
Сообщений: 753
По умолчанию

Цитата:
данные в необработанном
Глянуть можно?
помогу решить контрольные VB6, VBA (недорого)
Alex77755@mail.ru
alex77755 вне форума Ответить с цитированием
Старый 10.02.2010, 19:20   #9
xxxxx0111
Пользователь
 
Регистрация: 08.02.2010
Сообщений: 18
По умолчанию

EducatedFool

Сколько?

alex77755

Вот он
Вложения
Тип файла: txt tl018605.txt (2.3 Кб, 163 просмотров)
xxxxx0111 вне форума Ответить с цитированием
Старый 10.02.2010, 19:31   #10
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Цитата:
Вот он
Из данных в необработанном виде можно получить таблицы такого вида, но их всё равно придётся дополнительно обрабатывать макросом.
(хотя тут всё несколько проще - Word для промежуточной обработки не нужен)

Цитата:
EducatedFool
Сколько?
С подобными вопросами обращайтесь в личку. Контакты - в подписи.

В любом случае, покажите пример того, что должно получиться в Excel в результате работы макроса (как должен выглядеть конечный файл)
EducatedFool вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Преобразование .txt НеВа6464 Microsoft Office Word 5 14.09.2009 12:35
Не получается импортирование ActiveX компонентов Venom Софт 1 06.05.2009 19:19
С# and txt kommunist Общие вопросы .NET 2 03.06.2008 18:44
Из TXT в CSV CodeName47 Помощь студентам 17 22.01.2008 09:14
Как прочесть txt файл www.site.ru/info.txt BR17UY Работа с сетью в Delphi 1 16.04.2007 13:01