MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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

3 participantes

    [Resolvido]Abrir formulário para editar registro especificado

    AceCrz
    AceCrz
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 12/04/2017

    [Resolvido]Abrir formulário para editar registro especificado Empty [Resolvido]Abrir formulário para editar registro especificado

    Mensagem  AceCrz 2/4/2019, 15:33

    A situação é o seguinte:

    Tenho um subformulário onde mostra meus registros usei o comando para retornar o campo cod(numeração automática) usei o seguinte código para retornar o valor selecionado

    Dim stLinkCriteria As String
    stLinkCriteria = "" & Me!principal_sub![cod]

    Até ai ok, ele retorna certinho, porém eu tento abrir um formulário que edite esse registro, para isso eu preciso que ele abra o registro do cod =  17 por exemplo, mas ele sempre abre o formulário para editar em um novo registro. Estou usando o seguinte código:

    DoCmd.OpenForm "frm_editar", , , cod = stLinkCriteria

    Agradeço desde já. bounce bounce
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5022
    Registrado : 20/04/2011

    [Resolvido]Abrir formulário para editar registro especificado Empty Re: [Resolvido]Abrir formulário para editar registro especificado

    Mensagem  Silvio 2/4/2019, 17:34

    ele sempre abre o formulário para editar em um novo registro.

    Provavelmente o formulário que se abre, tem em algum evento ( Ao Abrir, Ao Carregar ) o comando: DoCmd.GoToRecord , , acNewRec


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    Celso Roberto
    Celso Roberto
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1076
    Registrado : 01/03/2014

    [Resolvido]Abrir formulário para editar registro especificado Empty Re: [Resolvido]Abrir formulário para editar registro especificado

    Mensagem  Celso Roberto 2/4/2019, 18:45

    Olá..

    Tente assim:

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "frm_editar"

    stLinkCriteria = "[cod]=" & Me!principal_sub!cod
    DoCmd.OpenForm stDocName, , , stLinkCriteria


    Aguardamos.

    Abraços


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....
    AceCrz
    AceCrz
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 12/04/2017

    [Resolvido]Abrir formulário para editar registro especificado Empty Re: [Resolvido]Abrir formulário para editar registro especificado

    Mensagem  AceCrz 3/4/2019, 02:02

    Silvio, já tinha pensado no caso, porém tava tudo certinho com os eventos do formulário.

    Eu consegui resolver na macro, colocando o seguinte expressão na condição WHERE ao abrir o formulário:

    ="[cod]=" & [Formulários]![Frm_pesquisa]![principal_sub]![cod]

    Celso, eu testei e deu certo também, valeu.

    Agradeço a vocês pela disposição em ajudar. Smile
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5022
    Registrado : 20/04/2011

    [Resolvido]Abrir formulário para editar registro especificado Empty Re: [Resolvido]Abrir formulário para editar registro especificado

    Mensagem  Silvio 3/4/2019, 12:07

    Se resolveu, muito que bem...


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    Celso Roberto
    Celso Roberto
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1076
    Registrado : 01/03/2014

    [Resolvido]Abrir formulário para editar registro especificado Empty Re: [Resolvido]Abrir formulário para editar registro especificado

    Mensagem  Celso Roberto 3/4/2019, 23:19

    Olá..

    Obrigado pelo retorno

    Abraços


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

      Data/hora atual: 27/1/2023, 05:53