Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.06.2011, 18:58   #1
Mayskiykot
 
Аватар для Mayskiykot
 
Регистрация: 03.12.2010
Сообщений: 4
По умолчанию Подсчёт кликов по урлу из ячейки

Здравствуйте, помогите начинающему нубу.
Скажите пожалуйста возможно ли Exel 2007 сделать такое. В левом столбце ссылки на интернет ресурсы и при нажатии на ссылку в правом столбце счётчик считал бы количество кликов по этой ссылке?
Mayskiykot вне форума Ответить с цитированием
Старый 13.06.2011, 19:21   #2
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
По умолчанию

В код листа (правый клик по ярлычку листа - Исходный текст):
Код:
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
With Target.Parent(1, 2)
    .Value = .Value + 1
End With
End Sub
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Старый 13.06.2011, 20:12   #3
Mayskiykot
 
Аватар для Mayskiykot
 
Регистрация: 03.12.2010
Сообщений: 4
По умолчанию

Цитата:
Сообщение от Казанский Посмотреть сообщение
В код листа (правый клик по ярлычку листа - Исходный текст):
Код:
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
With Target.Parent(1, 2)
    .Value = .Value + 1
End With
End Sub
Спасибо огромное! Всё работает
Вот только не могу сохранить результаты. Пробовал и с поддержкой макросов и без.

Последний раз редактировалось Mayskiykot; 13.06.2011 в 22:23.
Mayskiykot вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Бот, для кликов. andriy1111 Общие вопросы Delphi 7 10.05.2010 08:28
Много кликов по клику =) KoBRaAndrey Общие вопросы Delphi 3 26.03.2010 17:19
Обработка кликов TСooltrayicon Shouldercannon Компоненты Delphi 2 04.06.2009 21:58
обработка кликов в treeview CraZZy RabbIt Общие вопросы Delphi 2 28.03.2009 22:28
Отлов кликов мыши LAFUDR Помощь студентам 9 24.05.2008 01:32