Usar notação hexadecimal facilita entender números que certos objetos ou propriedades VBA usam. Uma dessas propriedades é cor. Por exemplo, a notação base-10 "65025" não revela a estrutura de três partes do número, mas a notação hexadecimal "&HFF00FF" revela: o componente vermelho está nos dois caracteres mais à direita, o azul nos dois do meio, e o verde no quinto e sexto da direita.
Clique na guia "Desenvolvedor" para expor controles para trabalhar com VBA.
Clique no botão "Visual Basic" para entrar no ambiente de programação VBA.
Cole o seguinte programa na janela central da tela. Este programa usa o símbolo de notação hexadecimal do VBA, "&H", para definir duas variáveis, "a" e "b". A variável "x" guarda a soma, e a instrução "MsgBox" exibe as representações não-hexadecimais de "a", "b" e "x".
Public Sub doHexMath() Dim x, a, b a = &H10 b = &HA x = a + b MsgBox a & " mais " & b & " igual a " & x End Sub
Clique em qualquer uma das instruções do programa para selecioná-lo.
Clique no comando "Executar" do menu "Executar". O Excel exibirá a mensagem "16 mais 10 igual a 26". Em hexadecimal, "10" equivale a 16, e "A" equivale a 10.
Clique na guia "Desenvolvedor", depois no botão "Visual Basic" no painel "Código". Isso trará o ambiente de programação VBA.
Cole o seguinte programa na janela que aparece. Este programa usa notação hexadecimal para atribuir cor de fundo à célula selecionada na pasta de trabalho. Essa notação aparece nas atribuições às variáveis "vermelho", "verde" e "azul". A instrução "ActiveCell" também usa notação hexadecimal, somando os componentes "vermelho", "verde" e "azul" para obter número no formato necessário para definir cores no Excel. Note que apenas a variável "vermelho" é não-zero. Isso significa que a cor será vermelho puro.
Public Sub colorCell() Dim azul, verde, vermelho vermelho = &HFF verde = &H0 azul = &H0 ActiveCell.Interior.Color = azul * &HFF00 + verde * &HFF + vermelho End Sub
Clique em qualquer instrução do programa para selecioná-lo para execução.
Clique no comando "Executar" do menu "Executar" para executar o programa.
Clique no ícone "Excel" na barra de tarefas do Windows para voltar ao Excel. Observe que a célula atual tem a cor vermelha especificada no passo 2.
Tecnologia Eletrônica © [www.351231.com]
