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

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

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

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

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 19.01.2009, 11:13   #1
EfDim
 
Регистрация: 15.10.2008
Сообщений: 3
По умолчанию Найти файл *.xls содержащий определенный текст

Подскажите как программно найти файлы *.xls содержащие определенный текст?
EfDim вне форума
Старый 19.01.2009, 11:21   #2
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

По очереди открывать файлы (а если надо, то папки и подпапки) и просматривая ячейки сравнивать с искомым текстом.
Другое дело, если путь к папке с файлами известен (или задается пользователем), и если искомый текст может находиться в заранее известной ячейке (диапазоне), то можно все сделать не открывая файлов.
Опишите задачу более подробно - получите более подробный ответ.
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 19.01.2009, 11:58   #3
EfDim
 
Регистрация: 15.10.2008
Сообщений: 3
По умолчанию

Цитата:
Сообщение от SAS888 Посмотреть сообщение
По очереди открывать файлы (а если надо, то папки и подпапки) и просматривая ячейки сравнивать с искомым текстом.
Другое дело, если путь к папке с файлами известен (или задается пользователем), и если искомый текст может находиться в заранее известной ячейке (диапазоне), то можно все сделать не открывая файлов.
Опишите задачу более подробно - получите более подробный ответ.
В открытом файле Книга1 на Листе1, в Яч. A1 размещен текст который необходимо найти, в Яч. A2. размещен путь к файлам (файлы закрыты) в которых необходимо произвести поиск текста из яч.А1. Диапазон в котором нужно искать А1:T30 (только на Лист1).
В процессе поиска, если в файле содержется текст = Книга1 Лист1 Яч.А1, тогда копируем из этого файла диапазон А1:T30 и вставляем в Книга1 Лист2, нашелся еще текст, вставляем ниже.

Последний раз редактировалось EfDim; 19.01.2009 в 12:20.
EfDim вне форума
Старый 19.01.2009, 12:17   #4
Pavel55
Форумчанин
 
Регистрация: 21.08.2007
Сообщений: 292
По умолчанию

Это может быть не совсем то, но может поможет - посмотрите файл
Вложения
Тип файла: rar Поиск во всех файлах в папке.rar (11.9 Кб, 23 просмотров)
Pavel55 вне форума
Старый 19.01.2009, 14:41   #5
EfDim
 
Регистрация: 15.10.2008
Сообщений: 3
По умолчанию

Цитата:
Сообщение от Pavel55 Посмотреть сообщение
Это может быть не совсем то, но может поможет - посмотрите файл
iFoundRng.EntireRow.Copy Destination:=.Cells(.Cells(.Rows.Co unt, 1).End(xlUp).Row + 1, 1) - копирует строку, что изменить что бы копировался диапазон А1:T20?
EfDim вне форума
Старый 19.01.2009, 16:22   #6
Pavel55
Форумчанин
 
Регистрация: 21.08.2007
Сообщений: 292
По умолчанию

Я смотрю у вас диапазон плавает, то T30, сейчас уже T20. Ну. не суть.

см. файл. Там мы копируем T30
Вложения
Тип файла: rar Поиск во всех файлах в папке2.rar (12.3 Кб, 27 просмотров)
Pavel55 вне форума
Закрытая тема


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Дан файл, содержащий текст на русском языке.Составить в алфавитном порядке список слов в файл. JiLiYa Паскаль, Turbo Pascal, PascalABC.NET 3 26.12.2008 12:05
создайте файл,содержащий суммы соответствующих чисел файлов Zara Паскаль, Turbo Pascal, PascalABC.NET 1 02.12.2008 19:26
Необходимо создать файл, содержащий информацию о багаже пасажиров Андрю)(@ Помощь студентам 3 27.11.2008 10:08
Необходимо создать файл, содержащий информацию о багаже пасажиров Андрю)(@ Паскаль, Turbo Pascal, PascalABC.NET 3 26.11.2008 23:58