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]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    avatar
    alexleite
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 11/02/2016

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  alexleite 12/2/2016, 18:13

    Boa tarde, pessoal!

    Sou novo aqui, e tenho o seguinte problema:

    Tenho uma Tela Inicial, onde o Usuário escolhe seu Nome (de uma tabela de Usuários, numa Caixa de Combinação) e a Data, normalmente a do dia, e clica no botão Continuar, que abre outro Formulário para digitar outros dados, sendo que o Código do Nome escolhido e a Data, serão utilizados para gravar o registro com os dados completos deste formulário.

    Neste segundo Formulário, que possui mais dados, eu quero mostrar o Nome e a Data que foram escolhidas/preenchidas na Tela Inicial.

    Grato
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  FabioPaes 14/2/2016, 16:06

    avatar
    alexleite
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 11/02/2016

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty trazer-informacao-de-uma-caixa-de-combinacao-do-formulario-anterior-para-o-atual-como-caixa-de-texto-ou-rotulo

    Mensagem  alexleite 15/2/2016, 20:15

    Fábio, muito obrigado pelo retorno!

    Só para deixar melhor explicado o que preciso:

    São 2 Formulários: For_Tela_Inicial e For_Tab_RG
    ----------------------------------------------------------------
    1) For_Tela_Inicial
    ==============

    Informação do Atendente

    Data: _________ (txtTelaInicialData) (Caixa de Texto)
    Atendente: xxxxxxxxxxxxxxxxxxxx[v] (cboTelaInicialAtendente) (Caixa de Combinação)

    [Sair] [Continua] <----- 2 Botões de Comandos [Continua] dá erro

    cmdTelaInicialSair e cmdTelaInicialContinua

    ---------------------------------------------------------------------------------------------

    2) For_Tab_RG
    ===========

    Data: 99/99/9999 (Trouxe da Tela Anterior)
    Atendente: xxxxxxxxxxxxxxxxxxxxxxxxxxxxx (Trouxe da Tela Anterior)
    (Obs: estes 2 valores acima serão gravados na Tab_RG, sendo a Data normal, porém

    RG ___________________ (digitado)


    [Salvar Registro] [Sair]
    -----------------------------------------------------------------

    Tabelas:

    1) Tab_Atendente:
    ==============
    (Núm) (Texto) (Texto)
    Cod_Atendente Atendente Periodo
    1 Fulano de Tal M
    2 Beltrano da Silva M
    3 Cicrano Pereira M

    2) Tab_RG
    =======
    (Núm) (Núm) (Data) (Texto)
    Código Cod_Atendente Data RG
    1 1 12/02/2016 12.345.678-9
    2 2 02/02/2016 45.678.910-3
    3 3 03/02/2016 11.222.333-4


    Os botões [Salvar Registro] [Sair] - Estão funcionando
    O que não funciona é o botão [Continua] do For_Tela_Inicial, que deveria simplesmente abrir o For_Tab_RG, num novo registro para a Tab_RG, trazendo a Data do Formulario Anterior, mostrar o Nome do Atendente, mas armazenar o número do Código deste, para gravar na Tab_RG.
    O erro que dá é Erro de tempo de execução '2501': A ação OpenForm foi cancelada:
    Private Sub CmdTelaInicialContinua_Click()
    DoCmd.OpenForm "For_Tab_RG", acNormal, , , acFormAdd
    End Sub

    Obs: A gravação dava certo na versão anterior, que tinha um só Formulário, que o Atendente tinha que Escolher toda vez o Nome dele mesmo na Caixa de Comando, que não era fixa, e a data sempre trazia a do próprio dia

    Agradeço a atenção
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  FabioPaes 15/2/2016, 20:21

    Se possivel posta o BD, indique o nome do formulario e botao...
    avatar
    alexleite
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 11/02/2016

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  alexleite 16/2/2016, 14:21

    Segue o BD
    Anexos
    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo AttachmentCópia_RG.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (475 Kb) Baixado 4 vez(es)
    avatar
    alexleite
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 11/02/2016

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  alexleite 16/2/2016, 18:03

    Já descobri que o erro ocorre por causa dos campos Data e Atendente, que não consegui trazer do Formulário anterior For_Tela_Inicial.

    Porém, isso poderia ser resolvido, de outro modo: Poderia ser apenas um Formulário, onde a Data e o Atendente fiquem fixos e, ao clicar no "Salvar Registro", seta o Foco para o campo RG.

    Se conseguir deixar os 2 primeiros campos fixos, já ajuda...

    Obrigado!
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  FabioPaes 16/2/2016, 18:50

    Veja agora amigo, se faltar algo avisa, que corrijo pra vc. Desculpe a demora, e que ta meio corrido por aqui...

    Veja o Codigo do Botao Enviar que vc entenderá...
    Anexos
    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo AttachmentCópia_RG.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (253 Kb) Baixado 14 vez(es)
    avatar
    alexleite
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 11/02/2016

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  alexleite 16/2/2016, 19:05

    Obrigado, Fábio.

    Vou testar melhor aqui e ver se ainda há dúvidas e te retorno.

    Inicialmente vou fazer algumas alterações, como não permitir edição da Data do For_RG, pois já foi escolhida a Data, e será esta sempre neste formulário, e o Código do Atendente tb, vou deixar invisível, pois não precisa aparecer e, por fim, setar o foco no campo do RG, que deve ser o primeiro a ser preenchido nesta 2a tela.

    No mais, só fazer as validações para não permitir valores nulos...

    Mas agradeço muito seu retorno. Até mais....
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  FabioPaes 16/2/2016, 19:45

    Bacana, mude a Ordem de Tabulação, e coloque os campos RG como indice 0, Via como indice de tabulação 1 e assim por diante, daee nao precisa nem colocar o foco pelo VB.
    avatar
    alexleite
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 11/02/2016

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  alexleite 16/2/2016, 20:24

    Fábio, acabei fazendo com o Set Focus mesmo, mas foi uma ótima idéia a sua.

    Eu Fiz algumas alterações:
    Omiti o Número do Atendente e movi o mesmo mais para a esquerda para ficar abaixo da Data.
    Alterei as Propriedades Habilitado para Não e Bloqueado para Sim, da Data e Atendente, pois eles são alterados APENAS na Tela_Inicial e devem permanecer fixas enquanto o Atendente estiver registrando seus atendimentos. Isto não ocorre!

    Notei que quando fiz uma gravação, esta ALTEROU O REGISTRO 1 e não um novo. Então fiz o comando para ir para novo registro, e ok.

    Falta, então, FIXAR os campos DATA e ATENDENTE na parte superior do For_RG e gravar sempre o mesmo que foi escolhido na tela anterior (Inicial)

    Depois preciso, ainda, validar os campos para não permitir valores nulos, exceto o Motivo, e o SMS, que pode estar desmarcado, mas, principalmente o ATENDENTE e DATA na Tela_Inicial.

    Grato, mais uma vez...
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  FabioPaes 16/2/2016, 21:48

    Hum.... agora entendi, eu achei que esse formulario seria fechado e sempre iniciaria um novo Cadastro pelo formulario inicial...

    Entao ao abrir o formulario ...RG ele nao mais sera fechado a cada registro???
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  FabioPaes 16/2/2016, 22:51

    Bom como você falou AGORA que ficara fixo o Atendente, Teste dessa Forma:

    O botao envia a Data e o Atendente para dois campos não vinculados no formulário (assim eles não mudam entre os registros, exceto se fechar o formulário). Aqui funcionou certim...
    Anexos
    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo AttachmentCópia_RG.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (315 Kb) Baixado 27 vez(es)
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  FabioPaes 16/2/2016, 22:53

    Quanto a Validação de Dados preenchidos ou nao... Veja aqui:

    https://www.maximoaccess.com/t25568-resolvidovalidar-tres-ou-mais-campos-de-um-formulario
    avatar
    alexleite
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 11/02/2016

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  alexleite 17/2/2016, 11:19

    Obrigado, mais uma vez, Fábio!

    Vou testar aqui e te dou um retorno depois...

    Vlw
    avatar
    alexleite
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 11/02/2016

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  alexleite 17/2/2016, 18:28

    Fábio, muito obrigado, de novo!

    Daqui já consigo me virar..

    Até breve, nas próximas dúvidas, que sei que terão.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  FabioPaes 17/2/2016, 19:02

    Bacana! Que bom que deu certo meu amigo, Bons Estudos!!!

    Conteúdo patrocinado


    [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo Empty Re: [Resolvido]Trazer informação de uma Caixa de Combinação do Formulário anterior para o atual como Caixa de Texto ou Rótulo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 05:21