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]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    DaviSilva
    DaviSilva
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 26/09/2013

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  DaviSilva 2/4/2018, 21:42

    Boa tarde a todos.

    Tenho a seguinte situação. Um formulário com alguns subFormulários.

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Sem_ty10

    Todos sao como padrão bloqueados com as propriedades

    Form.AllowAdditions = False
    Form.AllowEdits = False
    Form.AllowDeletions = False

    Pois bem, o que esta me intrigando é o seguinte... Não é o primeiro formulário que faço desta forma, inclusive tenho formulários muito mais complexos que este, com 5 ou 6 sub forms.

    Mas este em especial, quando clico no botão com icone de Cadeado onde tem o seguinte código:

    Código:

        Form.AllowAdditions = True
        Form.AllowEdits = True

        Me.SubSelecaoResultado.Form.AllowAdditions = True
        Me.SubSelecaoResultado.Form.AllowEdits = True
        Me.SubSelecaoResultado.Form.AllowDeletions = True

        Me.SubSelecaoResultado!SubSelecaoDestino.Form.AllowAdditions = True
        Me.SubSelecaoResultado!SubSelecaoDestino.Form.AllowEdits = True
        Me.SubSelecaoResultado!SubSelecaoDestino.Form.AllowDeletions = True

        Me.SubSelecaoResultado!SubSelecaoUsuario.Form.AllowAdditions = True
        Me.SubSelecaoResultado!SubSelecaoUsuario.Form.AllowEdits = True
        Me.SubSelecaoResultado!SubSelecaoUsuario.Form.AllowDeletions = True

    Que desbloqueia o form e seus sub forms, o formulário [SubSelecaoResultado], que é o primeiro sub form, retorna ao 1° registro. Sendo que não era para isso acontecer, era para ele continuar no registro atual, pois ao clicar no cadeado o usuário pretende alterar o registro atual.

    Já olhei os outros formulário onde a "Coisa Funciona", já copiei todas as propriedades.. mas sinceramente, continua retornando ao 1° registro.

    Os formulários não possui nenhum dos seguintes comandos:

    DoCmd.RunCommand acCmdRefresh
    Me.Refresh
    Docmd.Requery

    Porém, experimentei colocar um botão no SubForm [SubSelecaoResultado], que desbloqueia ele e seus subforms e neste caso ele não retorna ao 1° registro.

    Mas o problema que eu ainda terei que desbloquear o Formulário Pai, e neste momento ele retornará.

    Alguma Sugestão?
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  Silvio 2/4/2018, 22:40

    Boa noite.

    Reveja como estão os vínculos ( vincular campo mestre e campo filho ) entre os formulários em questão.


    .................................................................................
    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."
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  Noobezinho 2/4/2018, 23:44

    Davi


    Veja isso:

    Para  referenciar um subformulário usamos a propriedade Form.

    Para referenciar um subformulário dentro de outro subformulário,

    teremos que utilizar novamente a propriedade Form.

    Então:

    Me.SubSelecaoResultado.Form!SubSelecaoDestino.Form.AllowAdditions = True

    Veja se é isso que está "pegando"  Wink

    [ ]'s


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    DaviSilva
    DaviSilva
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 26/09/2013

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  DaviSilva 3/4/2018, 12:31

    Bom Dia.

    Silvio, ja olhei algumas vezes e veja como estão.

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Vincul10

    Os vinculos pai e mestre seguem a modelagem que fiz antes de criar o banco, segue modelos lógico e físico.

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Logico10
    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Fysico10


    Noobezinho, eu apaguei todo o código do botão para ir filtrando o problema, e eis que o fato ocorre quando esta linha entra em execução.

    -> Me.Form.AllowEdits = True

    A referência aos sub forms não causam o problema...
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  Noobezinho 3/4/2018, 12:53

    Davi

    Me. = Já é o proprio formulário.

    Então:

    Me.AllowEdits =True

    [ ]'s


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    DaviSilva
    DaviSilva
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 26/09/2013

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  DaviSilva 3/4/2018, 13:20

    Noobezinho... Ainda persiste o problema, mesmo usando Me.AllowEdits = True

    Minha maior estranheza é que, até hoje nenhum formulário com subformulário tinha tido este comportamento, seja o sub formulário folha de dados ou simples... após liberar o formulário o cursor mantinha-se no lugar..

    Agora, percebi algo diferente, coloquei msgbox em cada evento de um novo form, com sub form, onde não tinha quase nada no modulo, apenas o "Me.AllowEdits = True". O evento Form_ApplyFilter, ativa-se quando clico no botão de desbloquear, nos novos formularios que estou criando, enquanto que nos formulários antigos, isto não ocorre, não sei se tem algo a ver. Mas..., fora que não me lembro de no passado ter, diga-mos, limitado o filtro em algum formulário.

    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  Noobezinho 3/4/2018, 13:44

    Também estou estranhando isso, meu amigo.

    Tem coisas no Access, que nem o Tio Bill sabe dizer o que ocorre ! Razz

    Mas iria sugerir o que já está fazendo, criar um novo formulário com os devido subformulário e ver como se comporta.

    Por acaso esses formulários foram criados em versão antiga? Se sim, pode ser isso.

    Outra coisa que pode fazer é ver se isso acontece em outro pc.

    [ ]'s


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    DaviSilva
    DaviSilva
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 26/09/2013

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  DaviSilva 3/4/2018, 14:03

    Noobezinho, todos os formulários foram criados no Access 2000...

    Acabei de testar em outro PC... e pra minha surpresa, o cursor não retorna ao 1° registro...

    Sinceramente, não sei explicar. Fiquei feliz, pois os usuários poderão usar o formulário sem problemas, ao mesmo tempo ainda encucado pois não faz nem 2 semanas tinha criado um formulário semelhante e tudo ocorria normal...

    Vou ver se o T.I. da empresa formata meu computador ou algo do tipo. Mas ainda não vou encerrar o tópico, se der certo ou não ai vejo se encerro.

    Muito obrigado pela ajuda.
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  Noobezinho 3/4/2018, 14:08

    Davi

    Poderia separar as tabelas/consultas e forms afins e anexar para eu testar?

    Coloque uns 2 registros fictícios.



    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    DaviSilva
    DaviSilva
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 26/09/2013

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  DaviSilva 6/4/2018, 12:53

    Bom dia Noobezinho,

    Desculpe a demora, mas estive dois dias fazendo arquivo morto... Vida de Macaco Gordo é dificil... Rolling Eyes

    Emfim, voltei a mexer com o DB, estou enviando em anexo parte do banco funcional, com alguns registros e apenas o básico do modulo do formulário para não ficar pesado.

    Mas como disse antes, acredito ser meu PC, pois em outros PCS o cursor não perde o índice.

    Se puder dar uma olhada fico agradecido.

    Download DB pelo Google Drive
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  Noobezinho 6/4/2018, 20:03

    Davi

    Quando abro o formulário principal, é exibido o primeiro registro da tabela que é o de nº 3.

    Naveguei até o ultimo registro da tabela ( nº1) e liberei a edição clicando no cadeado,

    o qual me permitiu editar esse registro, não voltou para o primeiro registro (nº 3).

    Entendi que está funfando aqui. Wink

    [ ]'s


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    DaviSilva
    DaviSilva
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 26/09/2013

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  DaviSilva 9/4/2018, 21:37

    Noobezinho,

    O Registro do formulário principal não esta voltando mesmo, os que estão voltando é do subformulário, o que está logo abaixo de [Destino de peças Rejeitadas].

    Mas hoje acredito ter resolvido o problema, meio que sem querer, percebi que o formulário estava organizando por código de produto e tipo de trabalho no form principal.

    Resolvi criar uma consulta na [Origem de registro] do Form principal, e ordenei pelo IdSelecao.

    Mais tarde, cliquei no cadeado e percebi que não estava mais voltando. Acredito que seja este o problema, se você puder fazer dois testes para mim seria muito bom.

    1: Navegar até o registro 35 do subform [Destino...] e clicar no cadeado e ver o que ocorre.

    2: Depois, realizar a mesma consulta que fiz na origem do registro do form principal, depois refazer o o passo 1 e ver o que acontece, pois se resolver pra você, então acredito que achamos a solução.

    Muito obgdo.
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  Noobezinho 9/4/2018, 23:23

    Davi

    Abri o form Cadastro Seleção.

    Ele abre no Reg 3 que é o primeiro registro da tabela Seleção.

    No subform Destino de ... tem apenas um registro que é Marcas de cavaco, que

    por coincidência, creio, é o registro de nº 35 da tabela SeleçãoDestino.

    Agora vc disse para navegar até o registro nº 35 desse subform, mas

    ele tem somente esse registro.





    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    DaviSilva
    DaviSilva
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 26/09/2013

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  DaviSilva 10/4/2018, 12:17

    Bom dia Noobezinho, me desculpe pelo erro,

    O formulário não o Destino de..., seria um subform acima, este que tem o campo [Data de Seleção].
    Acredito que o botão com a seta para [Direita] esteja com código de navegação.

    Por favor, tirando este equivoco, se puder testar.
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  Noobezinho 10/4/2018, 12:46

    Davi

    Bom dia!

    1 - Ao clicar no cadeado, libera para edição ou para adicionar.
    O registro do form principal se mantem no reg 3 ( primeiro registro da tabela).

    2- Após criar a consulta para a origem de registro do form principal, ao clicar nas seta de navegação
    do subform, ocorre o seguinte:
    A navegação vai do reg 1 ao 4, pulando para o 20 indo até o 23, então, diz que não pode continuar
    como se estive chegado o final da tabela. O código fica parado na linha que da o next nos registros.
    O registro do form prinicipal se manteve no reg 1.


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    DaviSilva
    DaviSilva
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 26/09/2013

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  DaviSilva 10/4/2018, 14:13

    Noobezinho,

    Muito obrigado por sua atenção, como já havia dito a coisa deveria esta em meu pc, pois assim como iniciou-se sozinho, também parou sozinho.

    Não gosto deste tipo de solução pois não sei os causadores, e se ocorrer novamente não saberei como resolver, mas fazer o que.

    Agradeço a todos pela ajuda.
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  Noobezinho 10/4/2018, 15:40

    É Davi, entendo perfeitamente isso, mas como já disse,

    tem coisa que o Access faz, que nem o tio Bill sabe explicar! Twisted Evil

    Mas ainda bem que acontece no teu computador, não no de um cliente.

    Qualquer coisa, "tamos aí".

    Só falta o Resolvido pra fechar o tópico.

    Boa sorte!


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    DaviSilva
    DaviSilva
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 26/09/2013

    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  DaviSilva 10/4/2018, 16:12

    Esquisito, já tinha colocado o resolvido...

    emfim... Mto obgdo.

    Conteúdo patrocinado


    [Resolvido]Comando [Form.AllowEdits =  True] faz o subformulário voltar ao 1° Registro Empty Re: [Resolvido]Comando [Form.AllowEdits = True] faz o subformulário voltar ao 1° Registro

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 01:41