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


2 participantes

    Abrir formulario com fitlro

    avatar
    Carolina
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 15
    Registrado : 25/08/2010

    Abrir formulario com fitlro Empty Abrir formulario com fitlro

    Mensagem  Carolina 22/4/2013, 14:20

    1º formulario com os campos:
    Status : caixa de combinação
    Data: dois campos para digitar, data inicio e fim

    Precisa criar um codigo para abrir o segundo formulario com as informações pertinentes aos campos preenchidos no 1º formulario~(status e data)

    Aguardo ajuda.
    Obrigada
    Carolina

    o codigo abaixo abre o 2º formulario, filtrando apenas pelo campo "status". Preciso incluir a data também.
    Private Sub Comando12_Click()
    On Error GoTo Err_Comando12_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "Formulário2"


    stLinkCriteria = "[status]=" & "'" & Me![Combinação16] & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

    Exit_Comando12_Click:
    Exit Sub

    Err_Comando12_Click:
    MsgBox Err.Description
    Resume Exit_Comando12_Click

    End Sub
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    Abrir formulario com fitlro Empty Re: Abrir formulario com fitlro

    Mensagem  JPaulo 22/4/2013, 14:57

    Teste por favor;

    stLinkCriteria = "([status]='" & Me![Combinação16] & _
    "') And ([SeuCampoData]=#" & _
    Format(Me![SuaCaixaData], "dd/mm/yyyy") & "#)"




    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    Abrir formulario com fitlro Folder_announce_new Utilize o Sistema de Busca do Fórum...
    Abrir formulario com fitlro Folder_announce_new 102 Códigos VBA Gratuitos...
    Abrir formulario com fitlro Folder_announce_new Instruções SQL como utilizar...
    avatar
    Carolina
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 15
    Registrado : 25/08/2010

    Abrir formulario com fitlro Empty Re: Abrir formulario com fitlro

    Mensagem  Carolina 22/4/2013, 19:06

    JP
    Muitissimo obrigado.
    Funcionou perfeitamente, porém, somente com a condiçao de um data.
    É possível fazer o filtro com duas datas.. ex: data inicial e data final
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    Abrir formulario com fitlro Empty Re: Abrir formulario com fitlro

    Mensagem  JPaulo 22/4/2013, 21:32

    stLinkCriteria = "([status]='" & Me![Combinação16] & _
    "' And ([SeuCampoData] Between #" & _
    Format(Me![Datainicial], "dd/mm/yyyy") & "# AND #" & Format(Me![Datafinal], "dd/mm/yyyy") & "#)"


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    Abrir formulario com fitlro Folder_announce_new Utilize o Sistema de Busca do Fórum...
    Abrir formulario com fitlro Folder_announce_new 102 Códigos VBA Gratuitos...
    Abrir formulario com fitlro Folder_announce_new Instruções SQL como utilizar...
    avatar
    Carolina
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 15
    Registrado : 25/08/2010

    Abrir formulario com fitlro Empty Re: Abrir formulario com fitlro

    Mensagem  Carolina 29/4/2013, 21:13

    JP, não consegui.
    O campo na tabela chama Data_Arq
    A data inicio e a data final deve ser indicada através de dois campos?
    Na tabela só tenho 1 (Data_arq)
    Obrigada
    Carolina

    Conteúdo patrocinado


    Abrir formulario com fitlro Empty Re: Abrir formulario com fitlro

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/5/2024, 17:40