Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/VBS Адрес папки с файлом - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Вопросы по VB, VBS, VB.net » VBS Адрес папки с файлом (Иное/Other)
VBS Адрес папки с файлом
RAN Дата: Четверг, 30.10.2014, 14:59 | Сообщение № 1
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Всем Мяу.
Как в VBS прописать аналог Thisworkbook.Path (FullName)?


Быть или не быть, вот в чем загвоздка!

Сообщение отредактировал RAN - Четверг, 30.10.2014, 15:02
 
Ответить
СообщениеВсем Мяу.
Как в VBS прописать аналог Thisworkbook.Path (FullName)?

Автор - RAN
Дата добавления - 30.10.2014 в 14:59
AndreTM Дата: Четверг, 30.10.2014, 15:29 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1762
Репутация: 500 ±
Замечаний: 0% ±

2003 & 2010
Для каталога:
[vba]
Код
Set WshShell = CreateObject("WScript.Shell")
MsgBox WshShell.CurrentDirectory
[/vba]
Для самого скрипта:
[vba]
Код
MsgBox WScript.ScriptFullName
[/vba]


Skype: andre.tm.007
Donate: Qiwi: 9517375010


Сообщение отредактировал AndreTM - Четверг, 30.10.2014, 15:34
 
Ответить
СообщениеДля каталога:
[vba]
Код
Set WshShell = CreateObject("WScript.Shell")
MsgBox WshShell.CurrentDirectory
[/vba]
Для самого скрипта:
[vba]
Код
MsgBox WScript.ScriptFullName
[/vba]

Автор - AndreTM
Дата добавления - 30.10.2014 в 15:29
RAN Дата: Четверг, 30.10.2014, 15:31 | Сообщение № 3
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Андрей, мерси. Гоже.


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеАндрей, мерси. Гоже.

Автор - RAN
Дата добавления - 30.10.2014 в 15:31
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Вопросы по VB, VBS, VB.net » VBS Адрес папки с файлом (Иное/Other)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!