Поковырял поиск, часть нужной информации нашел, но всё же вопросы остались, с чем я и пришел. Начинаю погружаться в мир извлечения данных из .txt-файлов, в связи в возникшей потребностью.
txt-файлы содержат до 100 строк в один столбец, поэтому решил, что нужно писать макрос. Набрел на код следующего характера: [vba]
Код
Open filename For Input Access Read As #k1 While Not EOF(k1) Line Input #k1, s If s Like "ИСКОМЫЙ ТЕКСТ" Then
End If Wend
[/vba]
Отлично работает, но для меня осталось несколько неразрешенных вопросов. Как узнать номер строки, где был найден "ИСКОМЫЙ ТЕКСТ" и как продолжить поиск в цикле, начиная со строки с "ИСКОМЫМ ТЕКСТОМ"?
Пример не стал прикладывать, так как вопрос, как мне кажется, общего характера.
Буду признателен!
Всем привет!
Поковырял поиск, часть нужной информации нашел, но всё же вопросы остались, с чем я и пришел. Начинаю погружаться в мир извлечения данных из .txt-файлов, в связи в возникшей потребностью.
txt-файлы содержат до 100 строк в один столбец, поэтому решил, что нужно писать макрос. Набрел на код следующего характера: [vba]
Код
Open filename For Input Access Read As #k1 While Not EOF(k1) Line Input #k1, s If s Like "ИСКОМЫЙ ТЕКСТ" Then
End If Wend
[/vba]
Отлично работает, но для меня осталось несколько неразрешенных вопросов. Как узнать номер строки, где был найден "ИСКОМЫЙ ТЕКСТ" и как продолжить поиск в цикле, начиная со строки с "ИСКОМЫМ ТЕКСТОМ"?
Пример не стал прикладывать, так как вопрос, как мне кажется, общего характера.
Номер строки можно узнать так - считаете сколько раз произошло Line Input. Насчёт цикла - можно пропускать все строки до этого определённого выше числа. Вообще я предпочитаю использовать scripting.filesystemobject, тем более что если тут строк до сотни, то можно сразу всё взять в массив, а далее его крутить как угодно. Например [vba]
Номер строки можно узнать так - считаете сколько раз произошло Line Input. Насчёт цикла - можно пропускать все строки до этого определённого выше числа. Вообще я предпочитаю использовать scripting.filesystemobject, тем более что если тут строк до сотни, то можно сразу всё взять в массив, а далее его крутить как угодно. Например [vba]
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
