VBNet - Форум - Удалить событие на открытие гиперссылки

Вопрос: Удалить событие на открытие гиперссылки Добавлено: 12.09.08 16:46

Автор вопроса: RAVER | ICQ: 1005765

День добрый, уважаемые!

есть вопрос, может найдется у кого нить ответ :

по задумке:
при выборе ячейки с гиперссылкой - открывается окно с webbroserом - и в нем грузиться собственно гиперссылка.

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

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Exit Sub
End Sub

Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)
Exit Sub
End Sub

это не помогает, если вообще должно :)

может есть у кого нить какие либо мысли на этот счет?

Ответить

Ответы Всего ответов: 1

Номер ответа: 1 Автор ответа: mc-black ICQ: 308-534-060 Вопросов: 20 Ответов: 1860	Web-сайт: mc-black.narod.ru/dzp.htm Профиль \| \| #1	Добавлено: 18.09.08 11:11
	Не знаю наверняка, мо может тупо поменять адрес на about:blank? Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink) Target = "about:blank" End Sub Для какой цели это делается? Может просто не создавать гиперссылок, которые потом требуется блокировать? Сделать скрипт для прочистки рабочей книги от гиперссылок, или поменять гиперссылки так, чтобы они все ссылались внутрь самой книги? Sub Main() Dim hl As Hyperlink For Each hl In ThisWorkbook.Worksheets(1).Hyperlinks hl.Address = "" hl.SubAddress = "Ëèñò1!A1" Next hl End Sub Ответить

Страница: 1 |