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

Вход

Регистрация

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

 

= Мир MS Excel/Запуск файла с адресом, записанным в Range() - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Запуск файла с адресом, записанным в Range()
SkyGreen Дата: Четверг, 07.02.2019, 21:36 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 83
Репутация: 0 ±
Замечаний: 20% ±

Excel 2016
Доброго вечера, уважаемые программисты.
Помогите решить проблему.

Я запускаю файл через командную строку.
[vba]
Код

Sub Макрос1()
   Shell "cmd /c ""E:\каталог\1.mp3"", vbHide"
End Sub
[/vba]
Однако эта команда как-то так устроена, что непонятно как прописать адрес через ячейку Range()

Ответьте, если знаете - как прописать в команде VBA для запуска файла - адрес - не прямым текстом, а через ссылку на ячейку Range() ?
Что то вроде Shell "cmd /c Range("D3"), vbHide"

Вообще можно собрать эту команду - путем формулы:
Код
="cmd /c """""&D3&""""", vbHide"

а в скрипте указать
Код
Shell Range("D5")

Но это все-таки уже формульное решение, с дополнительной ячейкой. Хотелось бы такого избежать.
К сообщению приложен файл: 7537700.xls (40.5 Kb)


Сообщение отредактировал SkyGreen - Четверг, 07.02.2019, 21:38
 
Ответить
СообщениеДоброго вечера, уважаемые программисты.
Помогите решить проблему.

Я запускаю файл через командную строку.
[vba]
Код

Sub Макрос1()
   Shell "cmd /c ""E:\каталог\1.mp3"", vbHide"
End Sub
[/vba]
Однако эта команда как-то так устроена, что непонятно как прописать адрес через ячейку Range()

Ответьте, если знаете - как прописать в команде VBA для запуска файла - адрес - не прямым текстом, а через ссылку на ячейку Range() ?
Что то вроде Shell "cmd /c Range("D3"), vbHide"

Вообще можно собрать эту команду - путем формулы:
Код
="cmd /c """""&D3&""""", vbHide"

а в скрипте указать
Код
Shell Range("D5")

Но это все-таки уже формульное решение, с дополнительной ячейкой. Хотелось бы такого избежать.

Автор - SkyGreen
Дата добавления - 07.02.2019 в 21:36
Karataev Дата: Четверг, 07.02.2019, 22:15 | Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 1334
Репутация: 533 ±
Замечаний: 0% ±

Excel
[vba]
Код
Shell "cmd /c """ & Range("D3").Value & """, vbHide"
[/vba]
 
Ответить
Сообщение[vba]
Код
Shell "cmd /c """ & Range("D3").Value & """, vbHide"
[/vba]

Автор - Karataev
Дата добавления - 07.02.2019 в 22:15
krosav4ig Дата: Четверг, 07.02.2019, 22:25 | Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 2347
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
или [vba]
Код
shell "explorer """& [D3] &"""",vbhide
[/vba]


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеили [vba]
Код
shell "explorer """& [D3] &"""",vbhide
[/vba]

Автор - krosav4ig
Дата добавления - 07.02.2019 в 22:25
SkyGreen Дата: Четверг, 07.02.2019, 23:23 | Сообщение № 4
Группа: Пользователи
Ранг: Участник
Сообщений: 83
Репутация: 0 ±
Замечаний: 20% ±

Excel 2016
Karataev, krosav4ig, все работает. Спасибо.
 
Ответить
СообщениеKarataev, krosav4ig, все работает. Спасибо.

Автор - SkyGreen
Дата добавления - 07.02.2019 в 23:23
KuklP Дата: Пятница, 08.02.2019, 21:00 | Сообщение № 5
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
[vba]
Код
Shell "cmd /c" & [d3].Value & " , vbHide"
[/vba]


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
Сообщение[vba]
Код
Shell "cmd /c" & [d3].Value & " , vbHide"
[/vba]

Автор - KuklP
Дата добавления - 08.02.2019 в 21:00
  • Страница 1 из 1
  • 1
Поиск:

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