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]Alteração de cores personalizada em formulário continuo

    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  zcarloslopes 12/3/2014, 14:17

    Boa tarde,

    Estou com um problema que não cosigo ultrapassar de manei alguma, resolvi então pedir ajuda.

    Tenho um subformulário continuo tipo:

    CampoA | CampoB | CampoC

    Nome1   | Teste1  | 007
    Nome2   | Teste2  | 007
    Nome3   | Teste3  | 007
    Nome4   | Teste4  | 003
    Nome5   | Teste5  | 003
    Nome6   | Teste6  | 001
    Nome7   | Teste7  | 001

    O que eu pretendo é alternar as cores das linhas sempre que o CampoC alterar, isto é os registos com 007 ficariam a Verde (por ex.), os 003 a amarelo, os 001 novamnete a Verde, e assim sucessivamente.

    Desde já agradeço qualquer ajuda de como pegar no problema.

    Carlos
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  Avelino Sampaio 12/3/2014, 15:30

    Ola!

    Use a formatação condicional.

    Veja neste meu artigo:

    http://www.usandoaccess.com.br/dicas/dica5_1.asp?id=1#inicio

    E por programação , neste:

    http://www.usandoaccess.com.br/dicas/dica3.asp?id=1#inicio

    Bom estudo!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  zcarloslopes 12/3/2014, 16:04

    Obrigado pela rápida resposta..

    Eu já tinha dado uma olhada nesses links mas não se adequa ao que estou tentando fazer.

    Esqueci de referir que estou a usar o access 2003, e depois eu não quero o formulário tipicamente zebrado, quero que elterne as cores sim, mas pode ter mais que uma linha (registo)consecutiva da mesma cor enquanto o CampoC não alterar. Só altera a cor assim que a CampoC alterar também. Este CampoC pode ter o mesmo valor desde 1 a 100 registos.

    Obrigado.

    Carlos
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  zcarloslopes 15/3/2014, 17:55

    Alguma ideia de como pegar no problema?

    Aqui o forum era mesmo a minha última esperança.. :-(

    Obrigado

    Carlos
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  Avelino Sampaio 15/3/2014, 18:28

    Para a versão 2003 fica um pouco difícil o que deseja.  Veja se este meu exemplo serve.

    Aguardamos
    Anexos
    [Resolvido]Alteração de cores personalizada em formulário continuo AttachmentFormataçãoCondicionalFormContinuo.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (43 Kb) Baixado 55 vez(es)


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  zcarloslopes 15/3/2014, 19:16

    Mais uma vez obrigado pela ajuda. A ideia é de facto essa que mostrou no fichei anexo, mas não resolve na totalidade o problema.

    O CampoC que citei acima, é um campo tipo contador que é gerado para dar um múmero sequencial ao documento emitido, documento este com vários itens. Quando o formulário continuo é aberto ele abre com os dados de um utente apenas, logo o CampoC tem uma ordem ascendente, mas com registos intercalados, consequência do filtro. Este formulário é aberto para reimprimir o documento; para consultar os últimos documentos; e ainda (principalmente) para reemitir o documente com nova data e novo número sequencial (que irá gerar um novo documento).

    Como tal, se eu não distinguir os documentos por altaração de cor, fica difícil a sua utilização ao propósito a que se destina.

    Neste CampoC eu vou ter registos tipo:

    001/2014
    001/2014
    001/2014
    001/2014
    007/2014
    007/2014
    007/2014
    011/2014
    011/2014
    etc, etc

    Eu já tentei pegar a AbsolutePosition de cada registo, compara-lo com o registo anterior, e de acordo com o ser igual ou diferente, colocava o resultado numa textbox desacopulada, e depois seria simples alterar a cor... mas não estou a conseguir...

    Obrigado

    Carlos
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  zcarloslopes 15/3/2014, 20:10

    Outra forma que me "parece" possível resolver seria colocar um campo para automuneração das linhas, utilizando o DCount, mas que não contasse os repetidos... mas também as minhas tentativas falharam.. :-)

    Obrigado

    Carlos
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  Avelino Sampaio 16/3/2014, 08:10

    Carlos, é possivel montar como deseja mas com uma limitação.

    Teriámos que continuar a utilizar a formatação condicional mas existe uma limitação de até 3 cores.  Dá para montar com 4.  A questão é que a cada 4 sequencias a cor teria que voltar a repetir.  Exemplo:

    001/2014 - verde
    001/2014 - verde
    001/2014 - verde
    001/2014 - verde

    007/2014 - azul
    007/2014 - azul
    007/2014 - azu
    l
    011/2014 - Amarelo
    011/2014 - Amarelo

    013/2014 - Cinza
    013/2014 - Cinza
    018/2014 - verde - a partir da 5 sequencia as cores terão que se repetir
    018/2014 - verde

    019/2014 - Azul
    020/2014 - Amarelo
    020/2014 - Amarelo

    022/2014 - Cinza

    Serve desta forma ?

    Aguardamos


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  zcarloslopes 16/3/2014, 19:18

    Obrigado mais uma vez...

    Sim, dessa forma serve perfeitamenete.., aliás, nem seria preciso tanto, a cor pode repetir alternadamente que já serve. Da forma que citou ainda fica melhor.

    Obrigado mesmo.

    Carlos

    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  Avelino Sampaio 16/3/2014, 19:27

    Carlos,

    segue o exemplo modificado

    Criei um campo na tabela chamado Cor para receber a numeração sequencial.   Para preencher este campo utilizei o evento "ao abrir" do formulário com o seguinte código:


    Private Sub Form_Open(Cancel As Integer)
    Dim rs As DAO.Recordset
    Dim j%
    Dim Cod$
    Set rs = Me.RecordsetClone
    Do While Not rs.EOF
       If rs!código <> Cod Then
           j = j + 1
           If j = 5 Then j = 1
           Cod = rs!código
       End If
       rs.Edit: rs!Cor = j: rs.Update
       rs.MoveNext
    Loop
    rs.Close
    Set rs = Nothing
    End Sub


    Abra a formatação condicional da faixa e veja como ficou.
    Mantive visível o campo COR no formulário para vc ver como ficou a sequência

    Aguardamos
    Anexos
    [Resolvido]Alteração de cores personalizada em formulário continuo AttachmentCarlos.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (52 Kb) Baixado 39 vez(es)


    Última edição por Avelino Sampaio em 25/3/2014, 08:10, editado 1 vez(es)


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  zcarloslopes 16/3/2014, 19:38

    Perfeito! É isso mesmo...

    Obrigado mais uma vez.

    Um abraço.

    Carlos
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  zcarloslopes 16/3/2014, 19:44

    Este forum é sem dúvida o melhor!!!

    Obrigado

    Carlos

    Conteúdo patrocinado


    [Resolvido]Alteração de cores personalizada em formulário continuo Empty Re: [Resolvido]Alteração de cores personalizada em formulário continuo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 16:09