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

Вход

Регистрация

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

 

= Мир MS Excel/Готовые решения

МЕНЮ САЙТА
  • 1
  • 2
  • 3

КАТЕГОРИИ РАЗДЕЛА

ОПРОСЫ
Какой версией Excel Вы пользуетесь?
Всего ответов: 56984
Главная » Готовые решения » VBA » Процедуры

Перейти на сайт
10.12.2013, 16:57
[ Файл-пример (34.5 Kb) ]
Открыть из Excel нужный сайт
Для открытия интернет-странице в браузере по умолчанию используйте такой код:
Sub Go_To_Site()
Dim Link$
Link = [a1]
 If a1 = "" Then ThisWorkbook.FollowHyperlink Address:="http://excelworld.ru" _
 Else ThisWorkbook.FollowHyperlink Address:=Link
End Sub
Подразумевается что адрес сайта написан в ячейке А1, если же она пустая, то будет открыт сайт excelworld.ru
Добавил: Serge_007 | | Теги: эксель-интернет, vba, Открытие html сраницы, ВБА
Просмотров: 6084 | Рейтинг: 3.0/1
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!