![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Форумчанин
Регистрация: 08.06.2009
Сообщений: 179
|
![]()
Добрый день. Как получить полный путь к файлу стандартными средствами Excel?
|
![]() |
![]() |
![]() |
#2 |
Форумчанин
Регистрация: 24.06.2008
Сообщений: 516
|
![]()
в 2007 Excel
Код:
Можно сделать все! Было бы время, да деньги...
|
![]() |
![]() |
![]() |
#3 |
Форумчанин
Регистрация: 08.06.2009
Сообщений: 179
|
![]()
У меня стоит 2003 Excel
|
![]() |
![]() |
![]() |
#4 |
Форумчанин
Регистрация: 08.06.2009
Сообщений: 179
|
![]()
Спасибо, mchip. В 2003 Excel также есть такая функция.
|
![]() |
![]() |
![]() |
#5 |
Форумчанин
Регистрация: 08.06.2009
Сообщений: 179
|
![]()
Функция ИНФОРМ возвращает рабочий каталог. А мне нужно получить полный путь к активной книге.
В VBA есть функция ActiveWorkbook.Path. Как без помощи VBA узнать путь в активной книге? Может, нужно создать пользовательскую функцию? Подскажите как это сделать и где ее записать, чтобы эта функция была доступна для всех файлов Excel. |
![]() |
![]() |
![]() |
#6 |
Форумчанин
Регистрация: 06.08.2009
Сообщений: 472
|
![]()
можно, например, с помощью пользовательской функции, см. вложение
Сохраните файл на машине, откройте, далее Мастер функций - Определенные пользователем - ПУТЬ. У данной функции нет аргументов, она указываете путь данной книги. Для того, чтобы функция была доступна Вам в любом файле модуль с функцией необходимо перенести в Личную книгу макросов (если её у Вас нет, её необходимо создать записав любой макрос (Сервис - Макросы - Начать запись) и сохранив его в Личной книге, которая и будет создана). Также можно решить такой вопрос с помощью создания надстройки Эксель. |
![]() |
![]() |
![]() |
#7 |
Форумчанин
Регистрация: 08.06.2009
Сообщений: 179
|
![]()
Спасибо, EugeneS
|
![]() |
![]() |
![]() |
#8 |
Форумчанин
Регистрация: 06.08.2009
Сообщений: 472
|
![]()
Примечание:
При переносе в личную книгу макросов необходимо использовать не ThisWorkbook, а ActiveWorkbook иначе результатом будет путь личной книги макросов в которой сохранен модуль с функцией. Код:
|
![]() |
![]() |
![]() |
#9 |
Форумчанин
Регистрация: 08.06.2009
Сообщений: 179
|
![]()
Спасибо, я так и сделал
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Путь к файлу | Roman_Xxx | Win Api | 1 | 24.05.2010 21:13 |
путь к файлу | vedro-compota | Общие вопросы по программированию, компьютерный форум | 2 | 14.04.2010 13:47 |
Путь к файлу | Belokuraya | Microsoft Office Excel | 17 | 12.08.2009 17:30 |
Путь к файлу | Slash | Общие вопросы Delphi | 3 | 27.11.2008 14:02 |
Путь к файлу | Баламут | Win Api | 12 | 14.05.2008 13:27 |