Глюк. Excel, VBA.

Программирование на Visual Basic for Applications
-JM-
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 15.07.2005 (Пт) 9:55

Глюк. Excel, VBA.

Сообщение -JM- » 15.07.2005 (Пт) 10:06

Добрый день!

Проблема в следующем:
Есть событие (правый клик), по которому запускается форма. Ничего особенного. В 90% случаев все работает отлично. Но иногда происходит странная ошибка: допустим правый клик по ячейке А55, потом автоматом происходит прокрутка страницы на А15, ячейки А15 и А55 выделены обе сразу черной рамкой, появляется моя форма. Никак не могу отловить причину и самой главное последовательность появления ошибки.

Заранее спасибо за ответы.

Sedge
Alternative Choice
Alternative Choice
Аватара пользователя
 
Сообщения: 1049
Зарегистрирован: 16.05.2002 (Чт) 18:23
Откуда: Somewhere-In-The-Net

Сообщение Sedge » 15.07.2005 (Пт) 15:58

Телепаты в отпуске.
Код в студию.

Vitaly1
Брехман
Брехман
 
Сообщения: 1578
Зарегистрирован: 30.12.2002 (Пн) 16:35
Откуда: Russia, Mosсow

Сообщение Vitaly1 » 20.07.2005 (Ср) 16:06

код такой?:

Код: Выделить всё
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
UserForm1.Show
Cancel = True
End Sub


Более чем странно, что при нем может произойти вышесказанное!

SergT
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 237
Зарегистрирован: 22.06.2005 (Ср) 21:50
Откуда: Москва

Сообщение SergT » 22.07.2005 (Пт) 20:25

А что за зверь-Target? Может при нажатии и перемещении мышки что-то происходит? Или Вирус?
Л. Толстой, «зачем обдумывать обдуманное, бери готовое и иди дальше, в этом сила человечества»
"Всё в наших руках, поэтому их нельзя опускать" (Коко Шанель)

-JM-
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 15.07.2005 (Пт) 9:55

Сообщение -JM- » 16.08.2005 (Вт) 17:16

Код такой

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If Not Application.Intersect(Target, Range("PL")) Is Nothing Then
Cancel = True
MonthView1.Visible = True
MonthView1.Top = 80
Exit Sub
End If
End Sub

Andrev
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 108
Зарегистрирован: 19.01.2005 (Ср) 9:22
Откуда: Kursk

Сообщение Andrev » 16.08.2005 (Вт) 20:10

По-моему, надо файл выкладывать - или популярно объяснить, что такое MonthView1 и что вообще по замыслу должно происходить при правом клике.
В этой жизни нет ничего невозможного. Если у вас что-то не получается, значит, вы что-то делаете не так.

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 17.08.2005 (Ср) 2:47

А по-моему, вполне очевидно, что такое MonthView1, хотя это и не помогает понять, в чём проблема...
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 86

    TopList