MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Abrir formulário específico com VBA

    Compartilhe

    leandroribeiro23
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 22
    Registrado : 15/02/2016

    [Resolvido]Abrir formulário específico com VBA

    Mensagem  leandroribeiro23 em Ter 15 Mar 2016, 16:17

    Olá, estou com problema num código e não consigo resolver.
    Preciso abrir um formulário mas que mostre apenas informações específicas. Por exemplo: estou no formulário "frm_andamento_processo" no cadastro específico de uma mulher chamada MARIA JOSÉ, aí percebo que há algo de errado no cadastro dela, pode ser o nome errado, então quero abrir o formulário "frm_cadastro_autor_modificar_dados" para poder corrigir esses dados errados da autora MARIA JOSÉ.  
    Informações: há duas tabelas neste caso: a tabela "tab_cadastro_autor" que tem o campo "codigo_autor" e a tabela "tab_andamento_processo" que tem o campo "codigo_filho_autor". Elas estão vinculadas...

    Eu consigo fazer isso através de macros utilizando o comando Condição where: [Codigo_autor]=[Formulários]![Frm_andamento_Processo]![Codigo_filho_autor], entretanto, preciso que isso seja feito em VBA...

    O código com erro é o seguinte abaixo:

    Private Sub Comando392_Click()
        DoCmd.OpenForm "Frm_Cadastro_Autor_modificar_dados"
        Forms!Frm_Cadastro_Autor_modificar_dados!Codigo_autor = Forms!Frm_andamento_Processo!Codigo_filho_autor
    End Sub

    Quando rodo esse código aparece o seguinte erro: "erro em tempo de execução '2448': Você não pode atribuir um valor a este objeto"


    Fiz uma pesquisa aqui no site mas não encontrei nada parecido com o que quero.
    Obrigado e felicidades
    82 996468999

    bigfill
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 173
    Registrado : 27/03/2015

    Re: [Resolvido]Abrir formulário específico com VBA

    Mensagem  bigfill em Ter 15 Mar 2016, 20:33

    Boa tarde leandroribeiro23,

    Tente converter a Macro que funcionou em VBA.
    Anexos
    Converter Macro.png
    Você não tem permissão para fazer download dos arquivos anexados.
    (67 Kb) Baixado 7 vez(es)

    leandroribeiro23
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 22
    Registrado : 15/02/2016

    Re: [Resolvido]Abrir formulário específico com VBA

    Mensagem  leandroribeiro23 em Ter 15 Mar 2016, 21:00

    Olá, grato pela resposta. meu access é 2013 e essa opção de converter macro em VBA está desabilitada. tentei de toda maneira fazer a conversão, mas ele quando deixou por outro caminho que achei sempre deu erro e nem criou o código VBA.

    leandroribeiro23
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 22
    Registrado : 15/02/2016

    Re: [Resolvido]Abrir formulário específico com VBA

    Mensagem  leandroribeiro23 em Ter 22 Mar 2016, 14:19

    Olá consegui resolver o problema com o seguinte código no procedimento após atualizar

        DoCmd.OpenForm "Frm_Cadastro_e_andamento_Processo_para_modificar", , , "id_do_cadastro_geral=" & Me.Id_do_Cadastro_Geral

    Felicidades

    bigfill
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 173
    Registrado : 27/03/2015

    Re: [Resolvido]Abrir formulário específico com VBA

    Mensagem  bigfill em Ter 22 Mar 2016, 14:21

    leandroribeiro23, obrigado pelo retorno, o fórum agradece.

    cheers


    Favor alterar o tópico para "Resolvido"

      Data/hora atual: Dom 04 Dez 2016, 01:57