BobgosDjon Player что в файлах, которые Excel не считает надёжными, некоторые функции, как в данном случае ThisWorkbook.path, работают не так, как должны.
2 в написанной вами функции проверка каталога неверно обрабатывала путь при наличии ip адреса в нем.
Видимо вам все-таки нужно сконцентрироваться на п.2Проверка каталога не причем, путь относительно подключенного диска не менялся. Всё заработало только после настроек в Excel 2010, код в отчётах не менялся. Все перечисленные ранее эксперименты делались на копии.
В то-же время ваши слова всё равно заставили задуматься и ещё поэкспериментировать.
Дальше много текста, можно не читать, выводы в самом конце.
Для экспериментов использовался чистый файл с единственном кодом в объекте ЭтаКнига:
1.
2.
3.
Private Sub Workbook_Open()
MsgBox ThisWorkbook.path
End Sub
Такой-же файл я использовал в экспериментах при создании данной темы 3 назад. И тогда он при автозапуске выдавал пустую строку, а при пошаговом выполнении в отладчике выдавал правильный путь.
Сегодня же при экспериментах он предательски работал правильно. Я долго искал причину этого. Дело ещё в том, что сегодня с утра сервер с папкой отчётов был добавлен админом через групповую политику в список надежных расположений, соответственно у себя в настройках Excel 2010 я уже не мог удалить его из надежных расположений. Поэтому я стал экспериментировать на других серверах, но даже на левых серверах, даже если заходишь по IP-адресу макрос предательски выдавал правильный путь. Лишь несколько раз он выдал пустую строку, но эксперимент был не повторяемый, т.е. сначала выдавал пустую строку, а потом при последующих запусках выдавал правильный путь. У меня было подозрение, что он потом начинал считать его надёжным. Но я не прекратил эксперимент, т.к. 3 дня назад при начальном написании данной темы результат был стабильным, макрос всегда выдавал пустой путь в автоматическом режиме.
Не буду дальше томить написанием текста, в итоге я нашёл причину.
В настройках Excel 2010 в параметрах макросов во время сегодняшних экспериментов у меня была включенной опция "Отключить все макросы с уведомлением". Так вот при такой опции при открытии файла появлялась панелька с кнопкой "Включить содержимое". Я нажимал эту кнопку, после чего макрос срабатывал и выдавал правильный путь.
Как я писал выше, пару раз у меня было такое, что макрос всё-же выдавал пустую строку, так вот в тех случаях панелька "Включить содержимое" появлялась почему-то позже, уже после срабатывания макроса. Если-же сначала появлялась эта панелька и я нажимал кнопку "Включить содержимое", то макрос выдавал правильный путь.
Собственно это натолкнуло меня на мысль в параметрах макросов установить пункт, который был тогда 3 дня назад, а именно "Включить все макросы (не рекомендуется, возможен запуск опасной программы)".
После такой настройки результат стал стабильным. Панелька "Включить содержимое" при такой настройке не появляется, функция ThisWorkbook.path стабильно выдает пустую строку в режиме автозапуска.
Итог:
1. Если в параметрах макросов установлена опция "Включить все макросы (не рекомендуется, возможен запуск опасной программы)" и файл открывается из сетевого окружения и это сетевое окружение не добавлено в список надежных расположений, то в этом случае функция ThisWorkbook.path при автозапуске выдает пустую строку.
2. Если в параметрах макросов установлена опция "Отключить все макросы с уведомлением" и файл открывается из сетевого окружения, то не важно добавлен путь в список надежных расположений или нет.
а) В этом случае в 99% (цифра условная) случаев перед автозапуском появляется панелька "Включить содержимое", после нажатия которой срабатывает автозапуск и функция ThisWorkbook.path выдает правильный путь.
б) В 1% случаев (цифры условные) по непонятной причине сразу-же происходит автозапуск макросов при одних и тех-же параметрах и условиях и функция ThisWorkbook.path выдаёт пустую строку, а панель "Включить содержимое" появляется уже после выполнения макроса. А уже при повторном перезапуске выдает нормальный путь.
Т.е. по пункту 1 б результат не совсем стабильный, плюс куча вопросов для пользователя, их это напрягает.
Лучше на мой взгляд первый вариант. Главное чтобы антивирус работал и вовремя обновлялся.
