[Resolvido]Ao clicar, abrir form de edição

Bom dia senhores,

Tenho um form onde tenho uma caixa de listagem, e preciso que no momento que eu der duplo clique, o registro vá para a tela onde eu cadastrei o mesmo.

Olá Edgar,

Você pode fazer isso de 2(duas) maneiras ou com o comando DoCmd.OpenForm ou com a propriedade ItemsSelected e o laço FOR EACH...NEXT.

Veja um exemplo de duplo-clique em uma caixa de listagem:

(1) DoCmd.OpenForm "SeuForm", acNormal, "", "[CodNome]=[Forms]![frmPrincipal]![Lista2]", , acNormal

À medida que você sai digitando o comando DoCmd.OpenForm... etc o VBA irá mostrar o que você deve digitar entre aspas (""), escolha Filter por aí. Pratique !!!

(2) No evento duplo-clique da caixa de listagem:

Código:


On Error Resume Next
Dim frm As Form, ctl As Control
Dim varItm As Variant

      Set frm = Forms!Frm_PesquisaProduto
      Set ctl = frm!CaixaListaProdutos
        For Each varItm In ctl.ItemsSelected
          Me.txtPesquisaProd = ctl.Column(1, varItm)  '1 é a primeira coluna onde está o campo Descrição na listbox (0,1,2,3)
        Next varItm


VALEU MAN!

usei a primeira forma.
deu certo

(1) DoCmd.OpenForm "SeuForm", acNormal, "", "[CodNome]=[Forms]![frmPrincipal]![Lista2]", , acNormal

Olá Edgar,

Se você desejar aprofundar-se mais em Access VBA, adquira os meus dois livros (1) DOMINE O ACCESS VBA para iniciantes em programação e (2) TÉCNICAS ESPECIAIS DE ACCESS VBA pelos links abaixo:

(1) https://www.maximoaccess.com/t32310-segundo-livro-publicado-do-good-guy-domine-o-access-vba-para-iniciantes-na-programacao

(2) https://www.maximoaccess.com/t29536-livro-publicado-tecnicas-especiais-de-access-vba-da-autoria-de-good-guy


Lembre-se que o "O temor (obediência) ao Senhor é o princípio de todo o conhecimento." (Pv 1.7 ou Pv 9.10)