Convertendo valor de cor, no formato HTML(Hexadecimal) para Decimal
Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 5x no Cartão de Crédito.
Veja como comprar e saiba mais sobre o material oferecido, clicando aqui.
Até a versão 2003 era utilizado o valor Decimal nas propriedade de um objeto para identificar a cor, porém a partir da versão 2007 passou a ser utilizado o valor HTML (Hexadecimal). Observe na imagem abaixo, o valor selecionado de uma cor (#FCE6D4) para configurar o fundo de um campo.
Se necessitar utilizar a cor(#FCE6D4) pelo VBA, terá que passar para o formato Decimal. Exemplo de como podemos transformar este valor no formato HTML (Hexadecimal) para Decimal:
Cint("&h" & "FC") :::> 252
Cint("&h" & "E6") :::> 230
Cint("&h" & "D4") :::> 212
Pegamos os valores decimais, obtidos de cada parte e passamos para a função RGB().
RGB(252,230,212) :::> 13952764 (valor decimal da cor #FCE6D4)
Para configurar a cor de fundo de um campo, pelo VBA, podemos utilizar os dois formatos válidos:
me!NomedoCampo.BackColor = 13952764
'ou
me!NomedoCampo.BackColor = RGB(252,230,212)
Segue a função que converte o valor HTML para o valor Decimal, válido no VBA:
Faça o login aqui para ter acesso ao código.
Exemplo de uso da função:
me!NomeDoCampo.backColor = fncCorDec("#FCE6D4")
Bom estudo!
Os dez artigos mais visitados
MontaRibbons v.7.0 - Assistente completo para criar ribbons no Access
Vídeo - Controle personalizado de Acesso de Usuários
Vídeo - Aprenda sobre filtragens
Vídeo - Segurança máxima, usando o OPEN
Uma ajuda para quem está começando um negócio ou um projeto
Integrando o Access com Servidor MySQL - Introdução
Desabilitando a faixa(ribbon) superior do Access
Vídeo - Programação de relatórios - Parte 1
Como carregar o seu menu sem que ele vá para lista de suplementos
Vídeo - Criando Ribbons parte 1 - Conhecendo a estrutura Xml
Não há comentário |