MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Clicando no campo abre subform...

    Compartilhe

    Convidado
    Convidado

    [Resolvido]Clicando no campo abre subform...

    Mensagem  Convidado em Seg 08 Jan 2018, 16:22

    boas
    estou a tentar criar no meu bd o seguinte - ao clicar num campo - Data (DatePicker) escolho a Data e após escolher essa data este abre um form onde tenho alguns campo a preencher, e um deles é data, pretendia que este mantivesse a data anteriormente digitada. e que apenas mostrasse os registos dessa mesmo data... Agradeço a ajuda !
    Obrigado
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3335
    Registrado : 06/11/2009

    Re: [Resolvido]Clicando no campo abre subform...

    Mensagem  Assis em Seg 08 Jan 2018, 16:56

    Marco

    Teste

    No botão " Ir "

    DoCmd.OpenForm "form_2", , , "[Data] = # " & Format(Me.Texto6, "mm/dd/yyyy") & " #"


    .................................................................................
    *** Só sei que nada sei ***

    Convidado
    Convidado

    Re: [Resolvido]Clicando no campo abre subform...

    Mensagem  Convidado em Ter 09 Jan 2018, 09:36

    boas
    Assis nesse bd - teste... funciona ! mas... colocando em outro... não !

    Código:
    DoCmd.OpenForm "frmtabCadListaMedica", , , "[Data] = # " & Format(Me.campo_Data, "mm/dd/yyyy") & " #"

    Erro :
    run-time error ´3000´:
    Erro reservado (-3201); não há mensagem para este erro.



    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Clicando no campo abre subform...

    Mensagem  Noobezinho em Ter 09 Jan 2018, 12:16

    Marco

    "Data" é palavra reservada do Access, não se deve usa-la para nomes de campo/controles.

    Pode ser isso.

    Outra:

    Quando se clica no DatePicker, ele apenas preenche a caixa de texto, mas se verificar o valor utilizando o vba assim:

    Na caixa de verificação do vba:

    ? Forms!forms!Nomeform!NomecontroledeData

    Verá que o valor do campo é nulo, portanto, aí está o erro.

    Então, deve colocar o código no evento ApósAtualizar do campoData, para que o campo aceite a data escolhida e faça a verificação.

    Espero ter ajudado.

    [ ]'s


    .................................................................................
    Noobezinho - Balem

    * A solução funcionou?  [Você precisa estar registrado e conectado para ver esta imagem.] 
    Agradeça e feche o tópico clicando no botão Resolvido
    Se não sabe como, veja [Você precisa estar registrado e conectado para ver este link.].

    Como anexar imagem no teu post do fórum : [Você precisa estar registrado e conectado para ver este link.]

    * Criar arquivos.zip com o Winrar - veja [Você precisa estar registrado e conectado para ver este link.].

    Atualmente estou verificando se ajudamos alguém e não retornou.
    Se não deu retorno, não  ajudo novamente .

    Convidado
    Convidado

    Re: [Resolvido]Clicando no campo abre subform...

    Mensagem  Convidado em Ter 09 Jan 2018, 12:43

    boas
    Amigo Noobezinho, antes demais obrigado.
    Se bem entendi...
    Então, deve colocar o código no evento ApósAtualizar do campoData, para que o campo aceite a data escolhida e faça a verificação.
    Coloco o código - DoCmd.RunCommand acCmdShowDatePicker - no Evento Após Atualizar no form que estou a chamar o outro form !! ? Certo ?
    frmMarcacaoConsulta este form tem o botão que chama o outro form.
    Se for isso da o mesmo erro . . .

    Convidado
    Convidado

    Re: [Resolvido]Clicando no campo abre subform...

    Mensagem  Convidado em Ter 09 Jan 2018, 12:50

    Ups . . .
    Amigão desculpe ! resultou... em cheio ! Apos colocar a data temos efetivar a mesma ( enter ) e funciona.
    Obrigado.
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Clicando no campo abre subform...

    Mensagem  Noobezinho em Ter 09 Jan 2018, 12:56

    Estava digitando quando recebi tua última mensagem.

    Que bom que deu certo !

    Boa sorte !



    .................................................................................
    Noobezinho - Balem

    * A solução funcionou?  [Você precisa estar registrado e conectado para ver esta imagem.] 
    Agradeça e feche o tópico clicando no botão Resolvido
    Se não sabe como, veja [Você precisa estar registrado e conectado para ver este link.].

    Como anexar imagem no teu post do fórum : [Você precisa estar registrado e conectado para ver este link.]

    * Criar arquivos.zip com o Winrar - veja [Você precisa estar registrado e conectado para ver este link.].

    Atualmente estou verificando se ajudamos alguém e não retornou.
    Se não deu retorno, não  ajudo novamente .
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3335
    Registrado : 06/11/2009

    Re: [Resolvido]Clicando no campo abre subform...

    Mensagem  Assis em Ter 09 Jan 2018, 16:03

    Marco
    Ainda bem que resolveu.
    Eu dei ajuda para aquele exemplo que postou.
    Eu quando quero ajuda coloco o exemplo certo, mesmo que seja com dados falsos.


    .................................................................................
    *** Só sei que nada sei ***

    Convidado
    Convidado

    Re: [Resolvido]Clicando no campo abre subform...

    Mensagem  Convidado em Ter 09 Jan 2018, 16:17

    Assis meu amigo claro que ajudou... e se consegui foi por você me ter ajudado, e eu estou agradecido a si, não só por esta ajuda, mas por todas que me tem fornecido. Grato !
    Abraço

      Data/hora atual: Ter 24 Abr 2018, 22:09