EXCELer

Se pretendermos ver um formulário (que criámos anteriormente) ao efectuarmos duplo clique numa célula de uma worksheet, acedemos ao código dessa worksheet (clicando no tabulador com a tecla direita do mouse):



e escrevemos o seguinte código:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    UserForm1.Show
    Cancel = True
End Sub


Ao fazer-se duplo clique em qualquer célula da worksheet1, o resultado será o seguinte: