Você está aqui: Excel VBA ::: Dicas & Truques ::: Célula, Células, Range |
Como realçar a célula com o menor valor em uma seleção de células usando Excel VBAQuantidade de visualizações: 289 vezes |
Nesta dica mostrarei um truque muito interessante que nos permite percorrer todas as células selecionadas em uma planilha do Excel e realçar a célula com o menor valor. Para isso nós vamos combinar a função WorksheetFunction.Min() com o objeto Selection e um laço For Each. Quando a célula com o menor valor for encontrada nós definimos a sua cor de fundo usando Interior.Color e o valor vbYellow. Veja o código VBA completo para o exemplo: ' Procedimento usado para realçar a célula com o menor valor ' em uma seleção Sub DestacarMenorValor() ' vamos declarar uma variável para representar uma célula Dim celula As Range ' agora percorremos todas as seleções da seleção For Each celula In Selection ' esta célula possui o valor mínimo? If celula = WorksheetFunction.Min(Selection) Then ' vamos colorir o seu fundo de amarelo celula.Interior.Color = vbYellow End If ' passamos para a próxima célula Next celula End Sub Este código foi chamado a partir do clique de um botão após selecionar algumas células na planilha. É claro que você pode também usar uma combinação de teclas para ativar a macro mostrado neste exemplo. |
![]() |
Veja mais Dicas e truques de Excel VBA |
Dicas e truques de outras linguagens |
Python - Como tratar o evento wx.EVT_PAINT em suas aplicações wxPython - Interfaces gráficas no Python |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
1º lugar: Java |