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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 21.07.2009, 11:57   #1
Фауст
 
Регистрация: 21.07.2009
Сообщений: 3
По умолчанию Автозаполнение таблицы excel данными из word

Здравствуйте! Опишу кратко задачу: имеется файл word в котром находятся однотипные справки (последний раз их было 700), необходимо что бы в excel импортировались данные по каждой справке в отдельную строку, и брались из ворда после определенных слов (напрмер после слова вагон импортировался номер, после слова ремонт - деповской и дата и т.д.). Пример таблици excel привел в ворде тк не смог прикрепить экселевский файл.
Я полный чайник, посему дайте напрвление в котором копать, а в остальном да поможет мне google. Зарание спасибо!
Вложения
Тип файла: doc 21.07.2009.doc (24.5 Кб, 24 просмотров)
Тип файла: doc ексель.doc (29.0 Кб, 21 просмотров)
Фауст вне форума Ответить с цитированием
Старый 21.07.2009, 13:50   #2
viter.alex
Балуюсь кодами
Участник клуба
 
Аватар для viter.alex
 
Регистрация: 09.01.2009
Сообщений: 1,837
По умолчанию

Копать нужно в направлении методов поиска определенных слов в документе, извлечения частей текста из документа, работы с ячейками Excel.
Лучше день потерять — потом за пять минут долететь!©
viter.alex вне форума Ответить с цитированием
Старый 21.07.2009, 14:13   #3
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Вначале сохрани Ворд в текстовый документ.
Открываешь текстовый файл и работаешь с ним
Разбить на строки

Потом построчно сравнивай текст строки с искомым
Для примера
Код:
Dim строка As String

строка=" KAПИTAЛЬHЫЙ - 15 ФEBPAЛЯ  2002 Г. HA БEЛ Ж.Д. B 878 - БAPAHOBИЧИ-BЧД "
Если в строке присутствует слово КАПИТАЛЬНЫЙ  то результат будет True
If строка"Like "*KAПИTAЛЬHЫЙ*" Then

'Выбрать символы до точки и вставить в такую-то ячейку

End If
Если будет совсем трудно,стучись в Асю,или мыло
Анализ,обработка данных Недорого

Последний раз редактировалось doober; 21.07.2009 в 14:21.
doober вне форума Ответить с цитированием
Старый 22.07.2009, 21:36   #4
Фауст
 
Регистрация: 21.07.2009
Сообщений: 3
По умолчанию

Спасибо что ответили! После выходных посмотрим что получиться
Фауст вне форума Ответить с цитированием
Старый 23.07.2009, 03:07   #5
Aent
Форумчанин
 
Аватар для Aent
 
Регистрация: 17.07.2009
Сообщений: 519
По умолчанию

Фауст,
ваши справки это фактически программы обработки на неком формальном языке в котором термины являются терминальными символами.
Попытайтесь описать этот язык в виде регулярного выражения или конечного автомата и сразу получите решение вашей задачи.
Aent вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сообщение Автозаполнение в excel или word Николетта Microsoft Office Excel 3 24.04.2009 21:22
Автозаполнение в excel или word Николетта Помощь студентам 3 24.04.2009 19:42
Запись в Excel данных таблицы Word Диагностик Microsoft Office Excel 7 02.04.2009 20:55
Как вычислять значения вне таблицы WORD, с использованием данных из таблицы WORD prikolist Microsoft Office Word 6 21.11.2008 13:17