Po pierwsze nie napisałeś dla jakiego programu jest to makro.
Zakładam wiec, że dla Excela. Jeśli tak, to:
Nie napisałeś, gdzie umieściłeś procedurę zdarzeniową, odpowiedzialną za wywołanie Twojego makra. Jeśli w module ThisWorkbook to użyj takiej procedury zdarzeniowej:
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
MsgBox "Adres klikniętej komórki " & Target.Address
Cancel = True
End Sub
Jeśli natomiast w którymś z modułów arkuszy to użyj tej procedury:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
MsgBox "Adres klikniętej komórki " & Target.Address
Cancel = True
End Sub
Reasumując, kruczek polega na przypisaniu do argumentu Cancel wartości True. |