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

    [Resolvido]Caixa de Combinação do Access

    nickysplan
    nickysplan
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 21
    Registrado : 07/12/2010

    [Resolvido]Caixa de Combinação do Access Empty [Resolvido]Caixa de Combinação do Access

    Mensagem  nickysplan 7/12/2010, 18:58

    Então. eu tenho uma caixa de combinação com os valores Clientes, funcionários e despesa. E quero que quando eu clicar em em destes valores abra seu respectivo formulário [já existente].
    Agradeço
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  vieirasoft 7/12/2010, 19:01

    Boa tarde

    3 formulários diferentes, é isso?
    nickysplan
    nickysplan
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 21
    Registrado : 07/12/2010

    [Resolvido]Caixa de Combinação do Access Empty Caixa de Combinação do Access

    Mensagem  nickysplan 7/12/2010, 19:04

    sim! e tem um quarto formulário. onde está esta caixa de combinação.
    eu quero que quando clicar em um dos valores dentro desta caixa de combinação abra o formulário correspondente.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  vieirasoft 7/12/2010, 19:21

    Então faça assim, por favor:

    Abra um Módulo VBA e cole:

    Public Function AtivarMenu(Combmenu As ComboBox, subabrir As SubForm)
    Dim abrirform As String
    abrirform = Combmenu.Column(1)
    subabrir.SourceObject = abrirform
    subabrir.LinkChildFields = ""
    subabrir.LinkMasterFields = ""
    End Function

    Essa combo aqui dei-lhe o nome de Menu, deve colocar o nome da sua combo

    No evento actualizar da combo:

    =ativarmenu([Menu];[menuquadro])

    nickysplan
    nickysplan
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 21
    Registrado : 07/12/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  nickysplan 7/12/2010, 19:37

    ta, mas como eu faço pra abrir os formulários? Tem que escrever os nomes dos formulários em algum lugar não é? haha xd
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  vieirasoft 7/12/2010, 20:46

    Tem razão amigão

    Vou enviar-lhe o exemplo que tenho sobre isso:

    http://dl.dropbox.com/u/8157744/Menu.zip

    ou então, em alternativa:

    Criar uma consulta com os itens que você deseja pegar para seu formulário.
    Em propriedades, no menu fonte de controle, selecione a consulta que você criou. Agora, adicione uma caixa de combinação. No menu do assistente que vai aparecer, selecione: "Encontre um registro no meu formulário baseado no valor que eu selecionei em caixa de combinação." Escolha a tabela que vai te fornecer esses dados, o valor a ser selecionado, nome e o rótulo.

    No evento após actualizar da combo

    If suacombo.Text = "Contas" Then
    DoCmd.OpenForm "Formulário1"
    ElseIf combo.Text = "Depósitos" Then
    DoCmd.OpenForm "Formulario2"
    Else
    If suacombo.Text = "cheques" Then
    DoCmd.OpenForm "Formulário3"
    End If
    End If
    nickysplan
    nickysplan
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 21
    Registrado : 07/12/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  nickysplan 8/12/2010, 12:13

    deu certo!!! Obrigada! *pulinhos*


    Última edição por nickysplan em 8/12/2010, 12:32, editado 1 vez(es)
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  vieirasoft 8/12/2010, 12:24

    Então, você estudou o exemplo, certo e vejo que gostou. Dentro do formulário Menu e na vista da estrutura, pode verifica que existe um sub form independente que recebe os outros formulários, ou seja, os formulários ao serem chamados ficam dentro desse sub form.

    Se verificar que esse exemplo está demasiado avançado, diga-me que eu coloco aqui um exemplo simples com o outro código que lhe enviei.

    Mas estude bem o exemplo que parece complicado , mas não é.
    nickysplan
    nickysplan
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 21
    Registrado : 07/12/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  nickysplan 8/12/2010, 12:36

    ta, ok admito, nao deu tão certo assim.. então eu quero o exemplo básico pó pra ver porque cargas dágua que é que eu to errando. Se não for pedir de mais hehehe XD
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  vieirasoft 8/12/2010, 12:51

    OK, aguarde que vou cria-lo e posto aqui.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  vieirasoft 8/12/2010, 13:02

    Pronto amigo aqui vai:

    Trata-se do mesmo exemplo, nas criei um formulário o formulário2 (com acento). No form está uma caixa de combinação que aproveita a consulta do exemplo e abre 3 forms independentes.

    http://dl.dropbox.com/u/8157744/Menu%20personalizado.rar
    nickysplan
    nickysplan
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 21
    Registrado : 07/12/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  nickysplan 8/12/2010, 14:03

    ainda nao entendi. mas olha q eu fiz.. refiz toda a minha tabela e meus formulários neste que você me enviou e funcionou! Obrigada ^^
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  vieirasoft 8/12/2010, 14:04

    Obrigado pelo retorno.

    Conteúdo patrocinado


    [Resolvido]Caixa de Combinação do Access Empty Re: [Resolvido]Caixa de Combinação do Access

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/3/2024, 05:31