Anónimo
Programación vba
Quisiera que me ayudaran a declarar los valores para hacer funcionar el siguiente código
Private Sub CommandButton5_BeforeRightClick()
End sub
Más explicito, ocupo la ayuda para que al dar clic secundario en un commandbutton realize una función declarada.
No se si el de arriba sea el código correcto, ya que lo pongo y no hace nada al dar clic secundario o derecho.
Private Sub CommandButton5_BeforeRightClick()
End sub
Más explicito, ocupo la ayuda para que al dar clic secundario en un commandbutton realize una función declarada.
No se si el de arriba sea el código correcto, ya que lo pongo y no hace nada al dar clic secundario o derecho.
1 respuesta
Respuesta de Cadipas spain
1
Prueba esto:
(Ten en cuenta que las dos primeras lineas, son solo una línea y que cuando yo te envío un mensaje diciendo que "has pulsado el botón derecho" y ahí tienes que poner tu código)
Private Sub CommandButton1_MouseDown(ByVal Button As Integer,ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Button = 2 Then MsgBox "has pulsado el boton derecho"
End Sub
(Ten en cuenta que las dos primeras lineas, son solo una línea y que cuando yo te envío un mensaje diciendo que "has pulsado el botón derecho" y ahí tienes que poner tu código)
Private Sub CommandButton1_MouseDown(ByVal Button As Integer,ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Button = 2 Then MsgBox "has pulsado el boton derecho"
End Sub