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

Вход

Регистрация

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

 

= Мир MS Excel/Не открывается ссылка на вебсайт в Excel. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Не открывается ссылка на вебсайт в Excel. (Формулы/Formulas)
Не открывается ссылка на вебсайт в Excel.
Universe Дата: Пятница, 16.04.2021, 00:15 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Не открывается ссылка на вебсайт в Excel. Ошибка: "Не удается открыть: *Ссылка*. Не удается скачать нужные данные."

Ссылка на вебсайт статистики рынка труда по профессиям (США) - https://www.bls.gov/emp/tables/emp-by-detailed-occupation.htm
Она открывается только с vpn, а без него "access denied". И из-за этого excel не хочет её открывать. Мне нужно сделать так, чтобы после нажатия на ссылку, Excel открывал её в браузере (пусть даже c access denied, это не важно)

Уже несколько дней борюсь с данным вопросом. Помогите, пожалуйста, решить данную проблему.
К сообщению приложен файл: 6798936.png (9.5 Kb) · 5622022.png (32.7 Kb)
 
Ответить
СообщениеНе открывается ссылка на вебсайт в Excel. Ошибка: "Не удается открыть: *Ссылка*. Не удается скачать нужные данные."

Ссылка на вебсайт статистики рынка труда по профессиям (США) - https://www.bls.gov/emp/tables/emp-by-detailed-occupation.htm
Она открывается только с vpn, а без него "access denied". И из-за этого excel не хочет её открывать. Мне нужно сделать так, чтобы после нажатия на ссылку, Excel открывал её в браузере (пусть даже c access denied, это не важно)

Уже несколько дней борюсь с данным вопросом. Помогите, пожалуйста, решить данную проблему.

Автор - Universe
Дата добавления - 16.04.2021 в 00:15
Nic70y Дата: Пятница, 16.04.2021, 08:43 | Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 8705
Репутация: 2260 ±
Замечаний: 0% ±

Excel 2010
а так
[vba]
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    u_1 = Selection.Value
    u_2 = Left(u_1, 5)
    If u_2 = "https" Then
        With CreateObject("WScript.Shell")
            .Run u_1
        End With
    End If
End Sub
[/vba]работает?
К сообщению приложен файл: 1197569.xlsm (16.3 Kb)


ЮMoney 41001841029809
 
Ответить
Сообщениеа так
[vba]
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    u_1 = Selection.Value
    u_2 = Left(u_1, 5)
    If u_2 = "https" Then
        With CreateObject("WScript.Shell")
            .Run u_1
        End With
    End If
End Sub
[/vba]работает?

Автор - Nic70y
Дата добавления - 16.04.2021 в 08:43
Universe Дата: Пятница, 16.04.2021, 16:39 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Nic70y,
Да, так работает. Спасибо большое!
 
Ответить
СообщениеNic70y,
Да, так работает. Спасибо большое!

Автор - Universe
Дата добавления - 16.04.2021 в 16:39
Universe Дата: Пятница, 16.04.2021, 17:03 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Потратил ещё немного времени, но всё-таки решил проблему по-другому. Решение описано здесь:
https://docs.microsoft.com/ru-RU....eAlways
https://superuser.com/questio...._587725

Нужно создать подраздел Интернета и установить значение реестра. (Подраздел должен быть строго \Office\9.0\Common\Internet, а не 15.0 или 16.0. Это очень важно. Иначе ничего не получится)
 
Ответить
СообщениеПотратил ещё немного времени, но всё-таки решил проблему по-другому. Решение описано здесь:
https://docs.microsoft.com/ru-RU....eAlways
https://superuser.com/questio...._587725

Нужно создать подраздел Интернета и установить значение реестра. (Подраздел должен быть строго \Office\9.0\Common\Internet, а не 15.0 или 16.0. Это очень важно. Иначе ничего не получится)

Автор - Universe
Дата добавления - 16.04.2021 в 17:03
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Не открывается ссылка на вебсайт в Excel. (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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