Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Импорт множества текстовых файлов - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Импорт множества текстовых файлов
konstantinp Дата: Пятница, 20.07.2012, 16:41 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 86
Репутация: 0 ±
Замечаний: 0% ±

Добрый день, коллеги,
Как можно импортировать в Excel данные из текстовых файлов.
В текстовых файлах информация забита строками, их нужно по порядку в столбец "А"
Файлов txt порядка 100.
Да, еще в каждом txt файле последние 4 строки не нужны для конечного результата.

Прилагаю примерный файл, каких много и они разные по количеству строк.

Помогите пазязя)))
К сообщению приложен файл: 1753407.txt (0.5 Kb)


Сообщение отредактировал konstantinp - Пятница, 20.07.2012, 16:42
 
Ответить
СообщениеДобрый день, коллеги,
Как можно импортировать в Excel данные из текстовых файлов.
В текстовых файлах информация забита строками, их нужно по порядку в столбец "А"
Файлов txt порядка 100.
Да, еще в каждом txt файле последние 4 строки не нужны для конечного результата.

Прилагаю примерный файл, каких много и они разные по количеству строк.

Помогите пазязя)))

Автор - konstantinp
Дата добавления - 20.07.2012 в 16:41
Gustav Дата: Пятница, 20.07.2012, 19:33 | Сообщение № 2
Группа: Админы
Ранг: Участник клуба
Сообщений: 2797
Репутация: 1161 ±
Замечаний: ±

начинал с Excel 4.0, видел 2.1
Писать макрос на VBA по этой задачке мне не очень интересно. Поэтому рискну предложить несколько неожиданный способ - практически без Excel smile

Шаги:
1. Идем на уровень командной строки ОС, например, в файловом менеджере FAR

2. Все файлы складываем в одну папку.

3. В ней же создаем текстовый файл с простым именем типа 0.txt из одной строки
-------------------, завершающейся нажатием Enter, чтобы курсор перешёл в начало второй строки. Это будет файл-"разделитель".

4. В папке выполняем команду: dir > dir.txt /b
В результате в файле dir.txt оказывается список всех файлов папки.

5. Список файлов помещаем в Excel в столбец А, начиная с ячейки A1. Из списка удаляем наши служебные файлы 0.txt и dir.txt.

6. В ячейку B1 пишем формулу: ="copy " & A1

7. В ячейку B2 пишем формулу: =B1 & " + 0.txt + " & A2

8. Формулу ячейки B2 копируем вниз, до конца списка файлов в столбце A.

9. Из самой последней ячейки в столбце B берем результат и через пробел дописываем название результирующего файла.
Получается строка примерно такого вида:
copy 1.txt + 0.txt + 2.txt + 0.txt + 3.txt + 0.txt + 4.txt + 0.txt + 5.txt + 0.txt + 6.txt + 0.txt + 7.txt REZULTAT.csv

10. Копируем эту строку в командную строку и исполняем. (Возможно придется повторить это несколько раз с разными наборами файлов, если командная строка превысит допустимую длину, но общая идея, думаю, уже ясна)

11. Открываем файл REZULTAT.csv в Excel и "допиливаем" по своему усмотрению (типа удаляем четыре строки перед каждой "пунктирной линией" и саму линию).


МОИ: Ник, Tip box: 41001663842605
 
Ответить
СообщениеПисать макрос на VBA по этой задачке мне не очень интересно. Поэтому рискну предложить несколько неожиданный способ - практически без Excel smile

Шаги:
1. Идем на уровень командной строки ОС, например, в файловом менеджере FAR

2. Все файлы складываем в одну папку.

3. В ней же создаем текстовый файл с простым именем типа 0.txt из одной строки
-------------------, завершающейся нажатием Enter, чтобы курсор перешёл в начало второй строки. Это будет файл-"разделитель".

4. В папке выполняем команду: dir > dir.txt /b
В результате в файле dir.txt оказывается список всех файлов папки.

5. Список файлов помещаем в Excel в столбец А, начиная с ячейки A1. Из списка удаляем наши служебные файлы 0.txt и dir.txt.

6. В ячейку B1 пишем формулу: ="copy " & A1

7. В ячейку B2 пишем формулу: =B1 & " + 0.txt + " & A2

8. Формулу ячейки B2 копируем вниз, до конца списка файлов в столбце A.

9. Из самой последней ячейки в столбце B берем результат и через пробел дописываем название результирующего файла.
Получается строка примерно такого вида:
copy 1.txt + 0.txt + 2.txt + 0.txt + 3.txt + 0.txt + 4.txt + 0.txt + 5.txt + 0.txt + 6.txt + 0.txt + 7.txt REZULTAT.csv

10. Копируем эту строку в командную строку и исполняем. (Возможно придется повторить это несколько раз с разными наборами файлов, если командная строка превысит допустимую длину, но общая идея, думаю, уже ясна)

11. Открываем файл REZULTAT.csv в Excel и "допиливаем" по своему усмотрению (типа удаляем четыре строки перед каждой "пунктирной линией" и саму линию).

Автор - Gustav
Дата добавления - 20.07.2012 в 19:33
konstantinp Дата: Понедельник, 23.07.2012, 09:42 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 86
Репутация: 0 ±
Замечаний: 0% ±

Gustav,
Спасибо! оч. понравилось)))
 
Ответить
СообщениеGustav,
Спасибо! оч. понравилось)))

Автор - konstantinp
Дата добавления - 23.07.2012 в 09:42
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!