none
Butao direito do mouse RRS feed

  • Pergunta

  • Olá estou fazendo um projeto em que se apertado o butão direito do mouse ele abra uma nova form mas não sei o código para fazer isso.
    Alguém poderia me falar? 

    Tipo:

    Button1 (click esquerdo)
    Form2.show()
    Button1 (click direito)
    Form3.shown() 

    terça-feira, 9 de abril de 2013 21:13

Respostas

  • O código abaixo deve ser colado no formulário UserForm1. Ao se clicar com o botão direito no corpo do formulário, será exibido o formulário UserForm2:

    Private Sub UserForm_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
        If Button = 2 Then UserForm2.Show
    End Sub


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br

    sábado, 13 de abril de 2013 21:20
    Moderador

Todas as Respostas

  • Olá, bom dia.

    Estou migrando sua dúvida para o fórum especializado em vba.


    Obrigado por contactar o fórum Microsoft Technet!

    quinta-feira, 11 de abril de 2013 10:25
    Moderador
  • O código abaixo deve ser colado no formulário UserForm1. Ao se clicar com o botão direito no corpo do formulário, será exibido o formulário UserForm2:

    Private Sub UserForm_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
        If Button = 2 Then UserForm2.Show
    End Sub


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br

    sábado, 13 de abril de 2013 21:20
    Moderador