formda liste kutusuna nasıl kısayol menü (fare sağ tuş) eklerim?
teşekkürler

Private Sub Liste5_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = acRightButton Then
Set MyMenu = CommandBars("KisayolAdi")
MyMenu.ShowPopup
End If
End Sub