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

    Exemplo Cadastro Clientes, Produtos, forms de busca, menus e etc...

    formiga10x
    formiga10x
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 818
    Registrado : 11/09/2013

    Exemplo Cadastro Clientes, Produtos, forms de busca, menus e etc... Empty Exemplo Cadastro Clientes, Produtos, forms de busca, menus e etc...

    Mensagem  formiga10x 22/6/2016, 20:20

    [img]Exemplo Cadastro Clientes, Produtos, forms de busca, menus e etc... Ekp95c[/img]
    Anexos
    Exemplo Cadastro Clientes, Produtos, forms de busca, menus e etc... AttachmentTrekos.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (667 Kb) Baixado 990 vez(es)


    .................................................................................
    Abraço
    Formiga10x

    Sempre que possível poste o bd ou parte dele, com uma explicação bem clara e objetiva do que quer.
    “Um homem não está acabado quando enfrenta a derrota. Ele está acabado quando desiste - Richard Nixon”
    Formiga10x

    "Lembro do exato momento em que me dei conta que boa parte de minha vida foi dedicada a localizar erros em meus próprios programas."
    - Maurice Vicent Wilkes
    avatar
    Kaynan
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2965
    Registrado : 09/04/2012

    Exemplo Cadastro Clientes, Produtos, forms de busca, menus e etc... Empty Re: Exemplo Cadastro Clientes, Produtos, forms de busca, menus e etc...

    Mensagem  Kaynan 22/6/2016, 20:49

    Grande Elias,muito bom.
    avatar
    clacardoso61
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 24/05/2016

    Exemplo Cadastro Clientes, Produtos, forms de busca, menus e etc... Empty Formulario de Busca Cliente

    Mensagem  clacardoso61 20/7/2016, 00:59

    gostei muito do seu exemplo, adaptei no meu formulario, mas ocorre o erro abaixo, nao acho o porque,
    tem como me ajudar

    " erro em tempo de execução '3464';

    Tipo de dados incompativel na expressão de critério."

    Private Sub VerFormAberto()

       If IsNull(Me.ListaCliFor.Column(0)) Or Me.ListaCliFor.Column(0) = "" Then Exit Sub

       'VERIFICA SE O FORM ABERTO É O CADASTRO
       If CurrentProject.AllForms("Frm_Nfe").IsLoaded Then

           Form_Frm_Nfe.CarregaCliFor --->> para aqui
           DoCmd.Close
           
       End If

    End Sub
    Sub CarregaCliFor()
       
     
       Me.TxtNdocto = DLookup("Ndocto", "Tbl_Cadast", "Ndocto =" & Form_Frm_NfeCad.ListaCliFor.Column(0))
       Me.TxtNome = DLookup("nome", "Tbl_Cadast", "Ndocto =" & Form_Frm_NfeCad.ListaCliFor.Column(0))
       Me.[TxtCidade] = DLookup("cidade", "Tbl_Cadast", "Ndocto =" & Form_Frm_NfeCad.ListaCliFor.Column(0))
       Me.[TxtUf] = DLookup("uf", "Tbl_Cadast", "Ndocto =" & Form_Frm_NfeCad.ListaCliFor.Column(0))
       Me.[TxtCfo] = DLookup("cfo", "Tbl_Cadast", "Ndocto =" & Form_Frm_NfeCad.ListaCliFor.Column(0))

    '    HabilitaCampos
    '    HabilitaBotao
    End Sub

    Conteúdo patrocinado


    Exemplo Cadastro Clientes, Produtos, forms de busca, menus e etc... Empty Re: Exemplo Cadastro Clientes, Produtos, forms de busca, menus e etc...

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 06:38