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


4 participantes

    Controle de guias

    avatar
    eristonmattos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 194
    Registrado : 05/09/2018

    Controle de guias Empty Controle de guias

    Mensagem  eristonmattos 24/10/2018, 22:44

    Ainda não consegui resolver meu problema com controle de guias, usado para dividir os dados de uma tabela em suas
    páginas.... sejam usuário, empresa, profissional, atendimento, etc.

    Alguma ideia de como consigo usar autopreenchimento??

    Por exemplo: usando o evento ao clicar numa CBO?
    Está assim lá:
    Me.txt_Regional_Resid.Value = cbo_Cidade.Column(1)
    Me.txt_Cod_IBGE_Resid.Value = cbo_Cidade.Column(2)

    Mas só consigo retorno na primeira txt, na segunda não,

    A tabela relacionada contém:
    - a coluna 0 - Cidade
    - a coluna 1 - Regional_Residencia
    - a coluna 2 - Código IBGE

    Pq não AUTOPREENCHE a segunda caixa de texto (txt_Cod_IBGE_Resid)???

    Desde já agredeço.
    Eriston Mattos.

    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    Controle de guias Empty Re: Controle de guias

    Mensagem  Alexandre Neves 25/10/2018, 10:38

    Bom dia
    Tente
    Me.txt_Cod_IBGE_Resid.Value = cbo_Cidade.Column(2,cbo_Cidade.ListIndex)


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    eristonmattos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 194
    Registrado : 05/09/2018

    Controle de guias Empty Controle de guias

    Mensagem  eristonmattos 25/10/2018, 19:27

    Boa tarde Alexandre,

    Não funcionou com a inclusão ",cbo_Cidade.ListIndex"

    Vc não quer passar um e-mail seu, te envio o BD e vc dá uma olhada melhor,
    aqui não é possível anexar pq o tamanho mínimo zipado não comporta mais,
    só consigo diminuir até 4,65Mb.....
    Tenho outra questão com a guia "Profissionais de Saúde", pq queria que ela
    autopreenchesse ao perder o foco depois de digitar o nome do profissional de
    saúde (Que tem todos os dados preenchidos em uma tabela relacionada), mas
    tbm não tive sucesso.

    Pode ser nobre? um e-mail de contato e te envio o BD

    Desde já fico grato,
    Eriston Mattos.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Controle de guias Empty Re: Controle de guias

    Mensagem  vieirasoft 25/10/2018, 19:38

    Só uma observação que me chamou a atenção: O índice numa caixa de combinação - cbo - começa em 0 e não em 1. Logo, é possível que lhe preencha uma caixa de texto, por exemplo a caixa referente à coluna 1 e não a caixa referente à coluna 0. Daí que, você tenha escrito:"Mas só consigo retorno na primeira txt, na segunda não". Está em boas mãos. Abraço
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Controle de guias Empty Re: Controle de guias

    Mensagem  Silvio 25/10/2018, 19:43

    Boa tarde / Boa noite a todos...

    Apenas um pitaco.

    Coloque tua base de dados em um servidor e poste o link aqui sem o HTTP.

    Assim e dessa forma os demais colegas poderão lhe ajudar !!


    Em Tempo....saudações nobre e fraterno Veira, bom lhe ver novamente na ativa !!


    .................................................................................
    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."
    avatar
    eristonmattos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 194
    Registrado : 05/09/2018

    Controle de guias Empty Controle de guias

    Mensagem  eristonmattos 25/10/2018, 20:58

    Boa tarde nobres,

    A/C Vieira, até entendo o que vc diz, mas numa tabela o primeiro campo(coluna) não é considerado como "0", o segundo "1"e
    assim por diante??
    Então, a coluna 0 contém os dados da combobox (cbo_Cidade), a coluna 1 (txt_Regional_Resid) e a coluna 2 (txt_Cod_IBGE_Resid),

    Logo:
    os dados das colunas 1 e 2 retornariam o valor correspondente na cbo_Cidade... Ou não??

    Agora ao nobre Silvio, estou tentando criar um serviço de web servidor pra disponibilizar aqui o link.

    Desde já fico muito agradecido aos membros do agrégio forum.

    Att,
    Eriston Mattos.
    avatar
    eristonmattos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 194
    Registrado : 05/09/2018

    Controle de guias Empty Controle de guias

    Mensagem  eristonmattos 25/10/2018, 21:10

    Aos caros membros,

    o link para um servidor web (sem o HTTP) com o arquivo para quem interessar em auxiliar nesse BD que será usado
    no atendimento ao público, que atende na Saúde do Trabalhador aqui na minha cidade João Pessoa-PB.

    eristonmattos.000webhostapp.com

    Obrigado,
    Eriston Mattos.
    avatar
    eristonmattos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 194
    Registrado : 05/09/2018

    Controle de guias Empty Controle de guias

    Mensagem  eristonmattos 26/10/2018, 20:34

    Aos membros que enviaram dicas no meu post,  ainda não consegui sucesso nenhum
    com suas dicas, se o problema não foi resolvido então só resta a lembrança até alguém
    efetivamente resolver.... Ou a intenção do site com os foruns é outra???

    Não adianta dar uma resposta aqui se a pessoa não retorna pra saber se foi resolvido.

    Boa tarde


    Última edição por eristonmattos em 26/10/2018, 21:00, 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

    Controle de guias Empty Re: Controle de guias

    Mensagem  vieirasoft 26/10/2018, 20:41

    Leia as regras do Fórum. Não deve postar nada em BOLD ou fazer reparos à actuação dos colegas que o estão a tentar ajudar. Por favor, edite o texto que escreveu em Bold (negrito) e converta para texto sem realçar. Está avisado que deve respeitar as determinações do Fórum e respeitar os colegas.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    Controle de guias Empty Re: Controle de guias

    Mensagem  Alexandre Neves 26/10/2018, 20:43

    Boa noite
    O fórum tem o objectivo de ajudar todos no engrandecimento do conhecimento em Access. O conhecimento deverá ser partilhado com engrandecimento mútuo e evitar que haja repetição de trabalho quando já existe solução para a dúvida

    Assim, os exemplos devem ser apresentados de forma a todos terem acesso público

    Disponibilize dados significativos da dúvida, mas fictícios de forma a salvaguardar a privacidade quando necessário
    Veja (https://) eco.pt/2016/09/21/falta-de-espaco-experimente-estas-nuvens-gratuitas/


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    Controle de guias Empty Re: Controle de guias

    Mensagem  Alexandre Neves 26/10/2018, 20:44

    Boa noite, amigo Vieira
    Estávamos a responder em simultâneo. Claro que concordo com a sua resposta. Grande abraço


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    eristonmattos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 194
    Registrado : 05/09/2018

    Controle de guias Empty Controle de guias

    Mensagem  eristonmattos 26/10/2018, 21:05

    Ainda estou esperando algo alem de lembrarem das regras, mas não houve nada referente
    à questão.... Rápido chamar a atenção aqui né?!

    Qto ao BD que consta o problema, eu já o coloquei em um servidor web Alexandre Neves:

    eristonmattos.000webhostapp.com - Só incluir o HTTP

    Não demora terei cadastro e perfil em 10 lugares diferentes onde "subir" arquivos e nenhuma solução.

    Boa noite novamente

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Controle de guias Empty Re: Controle de guias

    Mensagem  vieirasoft 26/10/2018, 21:13

    Boa noite, amigo Alexandre. parece.me que este membro está um pouco irritado, descontrolado e com muita falta de humildade. Talvez não perceba que um fórum é um local de ajuda gratuito, que sai da boa vontade e do tempo disponível de cada um, e não de uma obrigação comercial. Abraço.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    Controle de guias Empty Re: Controle de guias

    Mensagem  Alexandre Neves 26/10/2018, 21:35

    Claro, amigo Vieira
    Este membro ainda não entrou dentro do espírito do fórum e pensa tratar-se de algum fórum em que tenha tido má experiência
    O nosso contributo é fazer o melhor e não permitir que ultrapasse os limites
    Este fórum se assemelha a uma família, aceitamos discussão e aprendizagem, má interpretação e clarificação dos pontos de vista. Assim se educa as pessoas, na família e neste fórum
    Temos vários exemplos que no início tiveram dificuldades em entender as regras, desconheciam o funcionamento, não encontravam todas as ferramentas de consulta ao dispôr (até eu demorei a entender como aproveitar as potencialidades disponíveis)

    Quanto à dúvida do colega, não tinha entendido que disponibilizou a hiperligação para a bd (afinal, estamos sempre a aprender)
    A solução começa por ter a combo com 3 colunas. Só com 3 colunas pode guardar os dados da origem de dados da combo


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Controle de guias Empty Re: Controle de guias

    Mensagem  Silvio 27/10/2018, 14:45

    Bom dia e boa tarde a todos...

    Um pitaquinho....

    Em tua combobox, você se esqueceu de dimensionar o numero de colunas a serem utilizadas.

    No exemplo ora postado, o numero de colunas está apenas com uma. Se olhar verá que tem 3 colunas na consulta que gera a tua combobox.
    Então o que tem para fazer é corrigir isso e dimensionar as larguras da mesma ao teu gosto.

    Em tempo também está errado o procedimento de eventos: retire de ao clicar para......Após atualizar !!

    Ficando assim...

    Código:
    Private Sub cbo_Cidade_AfterUpdate()
        Me.txt_Gerencia = Me.cbo_Cidade.Column(1)
        Me.txt_Cod_IBGE_Resid = Me.cbo_Cidade.Column(2)
    End Sub


    Outra coisa, não mude a nomenclatura dos campos oriundos de tabelas / Origem de dados....se quer mudar o nome, faça isso na tabela de origem e não nas propriedades das caixas de textos !

    Quer um exemplo ?
    Na tabela/Origem de dados está como : Cod_IBGE e olha só...no formulário: txt_Cod_IBGE_Resid

    Bons estudos.


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

    Conteúdo patrocinado


    Controle de guias Empty Re: Controle de guias

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 07:16