Страница 1 из 1
Открытие внешних файлов, эксель
Добавлено: 01 ноя 2013, 12:39
КосмАС
Привет.
Суть такова: запустить c экселя текстовый файл (без расширения файла, иногда с ним) с локальным или сетевым адресом прописанном в ячейке ( в каждой ячейке файл разный)
Все бы хорошо, если бы не файл без расширения, делаю функцию гиперссылка, с расширением открывает, без выдает ошибку (даже окна выбора программы открытия не выдает). Адрес на файл в ячейку нужный сделаю, вот как открыть вопрос, может можно как-то сделать запуск открытия в командной строке?
Дайте плиз ссылки на инфо если кто знает что похожее.
Заранее спасибо.
Re: Открытие внешних файлов, эксель
Добавлено: 01 ноя 2013, 13:30
somewhere
Вообще, открытие файлов без расширения уже ставит вопрос: "Чем открывать?". У файла должна быть либо связанная программа либо он сам должен быть исполнимым. И то и другое определяется с помощью расширения.
Таким образом если знаете чем открывать файл, то проще запустить связанную программу с передачей ей имени файла в качестве параметра.
Re: Открытие внешних файлов, эксель
Добавлено: 01 ноя 2013, 15:17
КосмАС
somewhere писал(а):Вообще, открытие файлов без расширения уже ставит вопрос: "Чем открывать?". У файла должна быть либо связанная программа либо он сам должен быть исполнимым. И то и другое определяется с помощью расширения.
Таким образом если знаете чем открывать файл, то проще запустить связанную программу с передачей ей имени файла в качестве параметра.
Открывать блакнотом, там только текст, но файлы без расширений (программы для станков с ЧПУ), их много и они под порядковыми именами, вот и стоит задача облегчить поиск нужного файла по имеющимся в таблице данным и вбитым именам файлов.
Обдумывал различные варианты, даже минибраузер привентил в ВБ, правда в нем можно только прочесть, да и то только введя имя (пока только это осилил).
Конечно банально можно капировать полученный адрес к файлу и Win+R, - вставить - выбрать чем открыть, но мне кажется можно и легче.
Может както привинтить что-то типа:
cmd c:\WINDOWS\system32\notepad.exe -open c:\file
Но тут где-то ошибка видимо
Re: Открытие внешних файлов, эксель
Добавлено: 01 ноя 2013, 15:59
Naeel Maqsudov
Код: Выделить всё
Sub qwe()
fname = "c:\tmp\1"
Open fname For Output As #1
Print #1, [a1]
Close #1
Shell "notepad """ & fname & """"
End Sub
Re: Открытие внешних файлов, эксель
Добавлено: 01 ноя 2013, 16:57
КосмАС
Naeel Maqsudov писал(а):Код: Выделить всё
Sub qwe()
fname = "c:\tmp\1"
Open fname For Output As #1
Print #1, [a1]
Close #1
Shell "notepad """ & fname & """"
End Sub
Спасибо, не все понял что есть что (простите нуб в программировании) но вот у меня получилось открыть заданный файл по коду:
Код: Выделить всё
Sub БагетРамкаСчелчек()
fname = Лист1.Range ("A3") * А3 - тут у меня адрес к папке
Shell "notepad """ & fname & Лист2.Range ("A5") * собственно сам файл
End Sub
но это если в коде писать файл, а можно както задать переменной значение ячейки под курсором или буфера обмена? Или можно както быстро привязать код к ячейке со значением?
Спасибо.