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

Вход

Регистрация

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

 

= Мир MS Excel/Переход в браузер по кнопке. - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Переход в браузер по кнопке.
Mark1976 Дата: Пятница, 27.06.2025, 08:22 | Сообщение № 1
Группа: Проверенные
Ранг: Ветеран
Сообщений: 812
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010, 2013
Здравствуйте. Необходимо по кнопке сделать переход в браузер (хром) на сайт реестра лекарственных препаратов. Адрес сайта в ячейке D1. Заранее спасибо.
К сообщению приложен файл: avtomatizacija_grls.xlsx (10.0 Kb)


Сообщение отредактировал Mark1976 - Пятница, 27.06.2025, 08:37
 
Ответить
СообщениеЗдравствуйте. Необходимо по кнопке сделать переход в браузер (хром) на сайт реестра лекарственных препаратов. Адрес сайта в ячейке D1. Заранее спасибо.

Автор - Mark1976
Дата добавления - 27.06.2025 в 08:22
bigor Дата: Пятница, 27.06.2025, 08:40 | Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 1373
Репутация: 267 ±
Замечаний: 0% ±

нет
Mark1976, кнопка обязяательна? в D3
Код
=HYPERLINK(CONCATENATE(A1;B1;C1);"тыц")
и жмакайте по ссылке
 
Ответить
СообщениеMark1976, кнопка обязяательна? в D3
Код
=HYPERLINK(CONCATENATE(A1;B1;C1);"тыц")
и жмакайте по ссылке

Автор - bigor
Дата добавления - 27.06.2025 в 08:40
Mark1976 Дата: Пятница, 27.06.2025, 08:43 | Сообщение № 3
Группа: Проверенные
Ранг: Ветеран
Сообщений: 812
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010, 2013
bigor, здравствуйте. Ошибка: не удается открыть.
 
Ответить
Сообщениеbigor, здравствуйте. Ошибка: не удается открыть.

Автор - Mark1976
Дата добавления - 27.06.2025 в 08:43
bigor Дата: Пятница, 27.06.2025, 09:14 | Сообщение № 4
Группа: Проверенные
Ранг: Старожил
Сообщений: 1373
Репутация: 267 ±
Замечаний: 0% ±

нет
не удается открыть
да, excel и у меня пытается сам открыть ссылку, но не может пролезть через прокси. Тогда макросом, рисуете кнопку и вешаете на нее макрос
[vba]
Код
Sub linl()
Shell ActiveSheet.Range("d1").Value, vbNormalFocus
End Sub
[/vba]
в ячейку А2 прописываем полный путь к Хрому, в D1 формула
Код
=СЦЕПИТЬ("""";A2;"""""";A1;B1;C1;"""""""")
К сообщению приложен файл: avtomatizacija_grls.xlsm (13.5 Kb)


Сообщение отредактировал bigor - Пятница, 27.06.2025, 09:15
 
Ответить
Сообщение
не удается открыть
да, excel и у меня пытается сам открыть ссылку, но не может пролезть через прокси. Тогда макросом, рисуете кнопку и вешаете на нее макрос
[vba]
Код
Sub linl()
Shell ActiveSheet.Range("d1").Value, vbNormalFocus
End Sub
[/vba]
в ячейку А2 прописываем полный путь к Хрому, в D1 формула
Код
=СЦЕПИТЬ("""";A2;"""""";A1;B1;C1;"""""""")

Автор - bigor
Дата добавления - 27.06.2025 в 09:14
Mark1976 Дата: Пятница, 27.06.2025, 09:40 | Сообщение № 5
Группа: Проверенные
Ранг: Ветеран
Сообщений: 812
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010, 2013
bigor, работает, но через доп.сообщение.
К сообщению приложен файл: 4086802.jpg (19.9 Kb)
 
Ответить
Сообщениеbigor, работает, но через доп.сообщение.

Автор - Mark1976
Дата добавления - 27.06.2025 в 09:40
bigor Дата: Пятница, 27.06.2025, 10:30 | Сообщение № 6
Группа: Проверенные
Ранг: Старожил
Сообщений: 1373
Репутация: 267 ±
Замечаний: 0% ±

нет
доп.сообщение.
удалите или закомментируйте вторую строку в макросе, которая на Msgbox начинается
 
Ответить
Сообщение
доп.сообщение.
удалите или закомментируйте вторую строку в макросе, которая на Msgbox начинается

Автор - bigor
Дата добавления - 27.06.2025 в 10:30
  • Страница 1 из 1
  • 1
Поиск:

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