ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вставка таблицы из txt в Excel
19 сообщений из 19, страница 1 из 1
Вставка таблицы из txt в Excel
    #34062921
Zerrero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Zerrero
Гость
О великие, у меня такая проблема... Есть txt файл в котором находится отчетная таблица за определенный период, можно ли автоматически преобразовать (через макрос) данные в таблицу Exel оставив только числовые значения без размерностей (км/ч, об/мин).
Пример строки из txt:
| 03.10.2006 | 12:00 | 0км/ч | 0об/мин | 2л | 0км |

Помогите, буду очень благодарен.
...
Рейтинг: 0 / 0
18.10.2006, 11:59:26
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34062945
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
выделяешь столбец и см аттач. для макроса включи рекордер
...
Рейтинг: 0 / 0
18.10.2006, 12:02:53
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34062985
Zerrero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Zerrero
Гость
Спасибо. Но непонял, извини, как данные из тхт взять...
Помоги еще раз.
...
Рейтинг: 0 / 0
18.10.2006, 12:09:27
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063030
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
ZerreroО великие, у меня такая проблема... Есть txt файл в котором находится отчетная таблица за определенный период, можно ли автоматически преобразовать (через макрос) данные в таблицу Exel оставив только числовые значения без размерностей (км/ч, об/мин).
Пример строки из txt:
| 03.10.2006 | 12:00 | 0км/ч | 0об/мин | 2л | 0км |

Помогите, буду очень благодарен.
Между числовыми данными и размерностями пробел есть?
Если да то их можно закидыватьв отдельный столбец а потом столбец удалять
...
Рейтинг: 0 / 0
18.10.2006, 12:16:22
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063043
Фотография A.K.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A.K.
Участник
ZerreroСпасибо. Но непонял, извини, как данные из тхт взять...
Помоги еще раз.

Открой сначала этот txt-файл в Excel через меню файл-открыть-... с включенным макрорекордером. В результате у тебя на экране откроется "Мастер импорта из текстового файла", а в рекордере запишется макрос на вызов метода Workbooks.OpenText(...).
Добейся корректного импорта файла через мастер и возьми готовый вызов OpenText(...) с нужными параметрами, записанный рекордером.
А затем заменяй все единицы измерения на пустые строки.
...
Рейтинг: 0 / 0
18.10.2006, 12:18:38
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063062
Фотография A.K.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A.K.
Участник
Твой случай - типичный формат файла "с разделителями", только на втором шаге мастера импорта нужно указать "другой" разделитель (|)
...
Рейтинг: 0 / 0
18.10.2006, 12:21:15
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063075
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
тхт файл надо открывать их EXCEL. Тип фойла (в низу) выбрать текстовый.
И будет счастье!


Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
18.10.2006, 12:24:03
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063179
Zerrero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Zerrero
Гость
Да есть еще люди... Всем огромное спасибо. Попробывал все варианты.
А можноли при созданом макросе выбирать данные из разных ТХТ файлов и данные втавлять в активную рабочую книгу.
Проститете дурака дайте как можно более полный ответ.
...
Рейтинг: 0 / 0
18.10.2006, 12:45:30
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063196
Фотография A.K.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A.K.
Участник
ZerreroДа есть еще люди... Всем огромное спасибо. Попробывал все варианты.
А можноли при созданом макросе выбирать данные из разных ТХТ файлов и данные втавлять в активную рабочую книгу.
Проститете дурака дайте как можно более полный ответ.

Открывайте каждый текстовый файл через OpenText, а затем копируйте нужный диапазон ячеек из него в нужное место основной рабочей книги. После копирования текстовую "рабочую книгу" можно закрыть без сохранения.
...
Рейтинг: 0 / 0
18.10.2006, 12:48:39
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063227
Zerrero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Zerrero
Гость
A. K. ты крут!!!!!
Глупый вопрос, а если вписанные в макросе имена ТХТ изменятся...
Можно ли создать макрос который будет спрашивать из какого ТХТ вставлять данные. Помогите плиззз.
...
Рейтинг: 0 / 0
18.10.2006, 12:55:39
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063262
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Может на одно листе в ячейках расположить имена тхт файлов которые нужно грузить? И полные пути к ним?


Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
18.10.2006, 13:03:46
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063280
Zerrero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Zerrero
Гость
talgat ты очень крут, а можно подробнее...
...
Рейтинг: 0 / 0
18.10.2006, 13:08:09
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063346
Фотография A.K.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A.K.
Участник
Мне же не известна твоя конкретная задача.
Я например в некоторых случаях вообще выношу все настройки (имена файлов, другие параметры, которые могут меняться) на отдельный лист, доступ к которому на изменение вообще можно защитить паролем, который знает только администратор. А потом в макросах считываю его из ячеек этого листа. Кстати, ячейки для удобства и повышения читабельности можно именовать.

Если имя файла должно вводиться каждый раз - можно запросить его в диалоговом окне функцией GetOpenFilename .

Возможностей много - но может быть стоит немного почитать документацию и понять основные принципы программирования в VBA?
...
Рейтинг: 0 / 0
18.10.2006, 13:22:06
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063349
Фотография A.K.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A.K.
Участник
Конечно же GetOpenFilename - это не функция, а метод объекта Application.
...
Рейтинг: 0 / 0
18.10.2006, 13:24:28
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063369
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Zerrerotalgat ты очень крут, а можно подробнее...
Например в ячейке А1 написано P:\tadzum\роо.txt

имяфайла=cells(1,1)
Workbooks.OpenText Filename:=имяфайла

И все
...
Рейтинг: 0 / 0
18.10.2006, 13:30:29
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063378
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
И так в цикле перебираешь все ячейки с именами файлов :-) например до пустой ячейки. Это надо проверять if имяфайла="" then


Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
18.10.2006, 13:33:46
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063397
Zerrero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Zerrero
Гость
A.K. прекрасно тебя понимаю, ты смотришь на проблемму с почки зрения продвинутого программера, а я с точки зрения офисного работника каторому поставили задачу с которой не так то и просто справится... Нужно было сразу описать ее. Необходимо брать информацию которая пишется в ТХТ, и делать ее пригодной для составления отчетов в Exel. Имя отчетного ТХТ фаила меняется, т.к. создается каждый день и его имя представляет собой число за которое он был создан. Поэтому я и хотел спросить как будет выглядеть строчка кода макроса который спрашивает из какого именно ТХТ ему брать данные для форматирования.
...
Рейтинг: 0 / 0
18.10.2006, 13:39:58
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063517
Фотография A.K.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A.K.
Участник
ZerreroИмя отчетного ТХТ фаила меняется, т.к. создается каждый день и его имя представляет собой число за которое он был создан. Поэтому я и хотел спросить как будет выглядеть строчка кода макроса который спрашивает из какого именно ТХТ ему брать данные для форматирования.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
  Dim MySheet As Worksheet ' лист рабочей книги, куда будем копировать данные
  Dim TxtFileName As Variant
  Dim TxtBook As Workbook ' текстовая рабочая книга, откуда будем копировать данные
  
  Set MySheet = ActiveSheet ' сохраним ссылку на текущий активный лист
  
  TxtFileName = Application.GetOpenFilename("Текстовые файлы (*.txt), *.txt")
  
  If TxtFileName <> False Then ' если пользователь нажал "ОК"
    'Откроем файл
    Workbooks.OpenText (TxtFileName)
    Set TxtBook = Workbooks(Workbooks.Count) ' получим ссылку на открытую книгу
    ' Выполним действия с открытым файлом, если это необходимо
    '...
    '...
    ' Выделим диапазон ячеек
    TxtBook.Worksheets( 1 ).Range("A1:B5").Select
    ' Скопируем в буфер диапазон ячеек
    Selection.Copy
    ' Вставим из буфера диапазон ячеек (достаточно указать ячейку-правый верхний угол области вставки)
    MySheet.Paste Destination:=MySheet.Range("D1")
    
    TxtBook.Saved = True ' чтобы не выводился запрос о пересохранении текстового файла
    TxtBook.Close 'закроем текстовый файл
  End If

А на будущее совет - проще всего узнать как сделать что-то программно, "подсмотрев" код который запишет макро-рекордер и отредактировав его по-своему.
...
Рейтинг: 0 / 0
18.10.2006, 14:11:08
| Ответить | Цитировать | Написать  
Вставка таблицы из txt в Excel
    #34063572
Zerrero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Zerrero
Гость
A.K. то, что надо, совет учту.
Премного благодарен.
P.S. Пенза это круто.
...
Рейтинг: 0 / 0
18.10.2006, 14:24:06
| Ответить | Цитировать | Написать  
19 сообщений из 19, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вставка таблицы из txt в Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=34063378&tid=2184115]:
 0ms
get settings:
 5ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 36ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 36ms
get tp. blocked users:
 1ms
others: 210ms
total:  311ms
созд. / загр.: 311ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]