MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Preencher campo desvinculado em Form

    Compartilhe

    maluco_sergio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 37
    Registrado : 09/11/2016

    [Resolvido]Preencher campo desvinculado em Form

    Mensagem  maluco_sergio em 12/1/2018, 13:04

    Bom dia,
    Precisava da preciosa ajudo do forum para resolver este problema.

    Tenho um form contínuo onde o campo "txtAssunto" está desvinculado. Eu queria que no Load do form o mesmo fosse preenchido com os dados do campo "Tipo" da tabela "tblCorrespondencia".
    Estou a usar um TempVars e pensei usar o select, mas não está a funcionar. Podem ajudar?


    Código:
    If TempVars!TipoES = "Entrada" Then
          
               Dim strAssuntoEntrada As String
                    strAssuntoEntrada = "SELECT tipo FROM Correspondencia WHERE ID = '" & Me.ID & "'"
                Me.txtAssunto = strAssuntoEntrada
                
                    
        Else
               Dim strAssuntoSaida As String
                    strAssuntoSaida = "SELECT tiposaida FROM Correspondencia WHERE ID = '" & Me.ID & "'"
                Me.txtAssunto = strAssuntoSaida
          
        End If

    Grande abraço, obrigado.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Preencher campo desvinculado em Form

    Mensagem  Noobezinho em 12/1/2018, 17:43

    Philipe

    Experimente assim

    Faça uma consulta seleção, colocando nela as 2 tabelas, primeiro a tabela do form contínuo e depois a tblcorrespondencia

    Puxe os campos que deseja no form continuo da primeira tabela e o campo tipo da segunda tabela.

    Utilize essa consulta como Fonte de registro do form contínuo.

    É isso.

    Quanto ao campo tipo, você pode colocar na legenda desse controle o nome que deseja (txtAssunto)

    Obs.: Esse exemplo irá funcionar somente se foi feito o relacionamento das duas tabela através do ID dos registros

    [ ]'s

    maluco_sergio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 37
    Registrado : 09/11/2016

    Re: [Resolvido]Preencher campo desvinculado em Form

    Mensagem  maluco_sergio em 15/1/2018, 22:34

    Noobezinho,
    Obrigado pela sua ajuda.

    Sucede que eu apenas tenho uma tabela: "correspondencia".
    Será que me pode ajudar a construir o código para preencher o campo "txtAssunto", com base na tabela "correspondência", onde campo ID é igual ao campo Me.ID do Form Contínuo.

    Obrigado.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Preencher campo desvinculado em Form

    Mensagem  Noobezinho em 15/1/2018, 22:45


    Bem, agora fiquei na dúvida.

    Tens uma tabela e um formulário.

    Tens o campo 'tipo' nessa tabela e quer que o que o controle desacoplado "txtAssunto" do formulário, desta tabela,

    seja preenchido com o valor do campo tipo.

    É Isso?

    Aguardo...

    maluco_sergio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 37
    Registrado : 09/11/2016

    Re: [Resolvido]Preencher campo desvinculado em Form

    Mensagem  maluco_sergio em 15/1/2018, 23:21

    Se calhar não fui claro, mas é isso mesmo que acabou de dizer.
    Tenho o campo "tipo" na tblCorrespondencia e queria que o campo desacoplado do "txtAssunto" do form seja preenchido com o valor do campo Tipo da tabela.

    O "ControlSource" também serviria para resolver?

    Obrigado

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Preencher campo desvinculado em Form

    Mensagem  Noobezinho em 15/1/2018, 23:31

    Felipes


    Na folha de propriedades da caixa de texto "txtAssunto", na propriedade Fonte do controle, coloque:

    = [tipo]


    [ ]'s

    maluco_sergio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 37
    Registrado : 09/11/2016

    Re: [Resolvido]Preencher campo desvinculado em Form

    Mensagem  maluco_sergio em 15/1/2018, 23:34

    Boas,

    Sim, dessa forma eu sei fazer. Precisava era de ajuda em VBA para no load do form o compo desacoplado "txtAssunto" fosse carregado consoante o TempVars!TipoES.
    Se TempVars!TipoES="Entrada" a origem seria o campo "Tipo" da Correspondencia, se TempVars!TipoES="Saída", a origem seria o compo "TipoSaida".

    Obrigado pela ajuda

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Preencher campo desvinculado em Form

    Mensagem  Noobezinho em 15/1/2018, 23:51

    Entendi

    Isso que colocou no teu código não funciona:

    strAssuntoEntrada = "SELECT tipo FROM Correspondencia WHERE ID = '" & Me.ID & "'"

    Apenas definiu uma sentença SQL para a variável strAssuntoEntrada , não é uma consulta.

    Melhor enviar  a tabela e o formulário com alguns registros para se analisar.

    Edit:

    Antes, experimente assim:

    Crie uma consulta seleção da tabela e  adicione o seguinte:

    SELECT Correspondencia.NOMECAMPO, Correspondencia.NOMECAMPO, Correspondencia.NOMECAMPO, Correspondencia.NOMECAMPO, Correspondencia.NOMECAMPO, IIf([Correspondencia].[tipoES]="Entrada",[Correspondencia].[tipo],[Correspondencia].[tiposaida]) AS txtAssunto
    FROM Correspondencia;

    Substitua os campos pelos campos da tua tabela, NOTE que já coloquei os campos no IIF() (Seimed()), em negrito.

    Teste se a consulta funfa e  então use-a como Fonte de registro do formulário.


    [ ]'s

    maluco_sergio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 37
    Registrado : 09/11/2016

    Re: [Resolvido]Preencher campo desvinculado em Form

    Mensagem  maluco_sergio em 16/1/2018, 22:04

    Boas.
    Obrigado pela ajuda.
    Resolvi de outra maneira.
    No form coloquei todos os campos que queria e no load, consoante o tempVars mostra ou esconde.
    Não é a melhor solução, mas resulta bem.
    Obrigado.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Preencher campo desvinculado em Form

    Mensagem  Noobezinho em 16/1/2018, 22:11

    Ótimo que conseguiu.

    As instruções que passei, estão funcionando  aqui na minha máquina.

    É uma simples consulta, sem precisar de código VBA.

    Valeu o retorno

    Boa sorte

      Data/hora atual: 16/12/2018, 18:19