Связать макрос, чтобы выделить ячейку onclick?

Question

В excel 2000 можно ли связать функцию vba, которая будет выполняться при нажатии кнопки с помощью мыши?

Answer 1

Найдено решение:

Сделать именованный диапазон для ячеек, которые вы хотите, чтобы захватить clickevent

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
    Application.EnableEvents = False 
    Application.ActiveSheet.Cells(1, 1).Value = Target.Address 
    If Not Intersect(Target, Range("MyNamedRange")) Is Nothing Then 
     ' do your stuff 
     Range("A1").Select 
    Endif 
    Application.EnableEvents = True 
End Sub 

Answer 2

Вы можете привязать к ячейке двойной щелчок.

Открыть VBA, Гото рабочий лист, который вы хотите проволоки до события Выберите WorkSheet в раскрывающемся меню в левом верхнем углу и BeforeDoubleClick в правом верхнем углу чеке Target.Address равно адрес ячейки вы заботитесь и вызовите функцию, которую вы хотите.

Что-то вроде этого:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
    If Target.Address(True, True, xlA1) = "$A$1" Then 
     Call MyDemo 
    End If 
End Sub 

Private Sub MyDemo() 
    MsgBox "Hello" 
End Sub