Страницы: 1
RSS
Взять значения из текстового файла
 
Доброго времени суток.  
Помогите , пжл,  с макросом.  
Как сделать, чтобы выбирались только файлы с расширением .txt и вытаскивалось их содержимое (обычно одна строка) в соседнюю ячейку.
 
Лови. Изменения идут после строки  
strFile = Dir(...  
 
А почему не использовал экселевский диалог GetOpenFileName?
 
С VBA у меня плохо. Могу только чей-нибудь макрос переделать под свои нужды.  
 
Как выяснилось у метода одна проблемка: макрос не просматривает вложенные папки.  
Можно это как-то поправить?
 
Казанский, ребрендинг? :-)
 
{quote}{login=sva}{date=10.06.2010 05:49}{thema=}{post}С VBA у меня плохо. Могу только чей-нибудь макрос переделать под свои нужды. Как выяснилось у метода одна проблемка: макрос не просматривает вложенные папки. Можно это как-то поправить?{/post}{/quote}  
В окне Поиска набираем два слова: вложенные папки
 

Сорри, сейчас некогда, посмотри функцию processFolder тут: http://forum.ixbt.com/topic.cgi?id=23:38561#6 <BR>2 Юрий М Rebranding? Nah, rather market gain :)

 

Перебрать все файлы TXT в подпапках поможет эта функция: <BR>http://excelvba.ru/code/FilenamesCollection <BR>А считать содержимое текстовых файлов - эта: http://excelvba.ru/code/txt

 
Всем спасибо за участие.  
Тема закрыта.
Страницы: 1
Читают тему
Наверх