|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
01.10.2009, 12:05 | #1 |
Регистрация: 17.07.2009
Сообщений: 9
|
Автозапуск макросов
Господа, возник следующий вопрос... написал следующую функцию...
Код:
Мысль в том, как это выводить автоматом при выделении (по возможности не в статусбар, а правее, там, где выводится сумма выделенных ячеек... С уважением, blacklight. P.S. MX с bit.print.info предложил: Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Count = 2 Then Application.StatusBar = "Разница = " & (Target(1) - Target(2)) else Application.StatusBar = "Разница = ?" End If End Sub но он почему-то не работает... |
01.10.2009, 13:03 | #2 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Последний макрос вполне работоспособен.
А в какой модуль Вы поместили этот код? Он должен находиться в модуле требуемого листа.
Чем шире угол зрения, тем он тупее.
|
01.10.2009, 13:33 | #3 |
Регистрация: 17.07.2009
Сообщений: 9
|
Спасибо, заработало, но оказалось, что мой код правильнее, т.к. можно выделять ячейки не стоящие рядом... =)
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Создание макросов | Женечка2607 | Microsoft Office Excel | 3 | 23.04.2009 21:17 |
Панель для макросов | shadowbeast | Microsoft Office Word | 6 | 18.03.2009 21:09 |
Автоматический запуск макросов с листа на котором указан перечень макросов с параметрами и без | Neoli | Microsoft Office Excel | 2 | 09.03.2009 14:31 |
Сравнение макросов | valerij | Microsoft Office Excel | 24 | 09.06.2008 00:57 |