ник: Анатолий (Киев)
Переименовать файл или переместить в пределах диска можно и средтвами VBA:
Name староеИмя As новоеИмя
Заменить существующий нельзя, но его наличие можно проверить (Dir) и удалить (Kill)
А можно как то в текстовом файле ненужные строки, идущие после ключевого слова - удалять
|
Опять же средтвами VBA можно прочитать содержимое файла в переменную:
i = FreeFile: Open "C:\Файл.txt" For Input As i: s = Input(LOF(i), i): Close i
|
Затем в переменной наити вхождение ключевого слова (InStr), отбросить лишнее (Left) и сохранить в файле:
i = FreeFile: Open "C:\Файл.txt" For Output As i
Print #i, s
Close #i
|
PS. Обе задачи можно выполнить и с помощью FSO. Это дело вкуса.