 |
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: 446 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. |
 Link para compartilhar na Internet ou com seus amigos: |
Veja mais Dicas e truques de Excel VBA |
Dicas e truques de outras linguagens |
|
Delphi - Como usar a propriedade Eof para verificar se estamos no último registro do TClientDataSet do Delphi Java - Como usar o método next() da interface Iterator do Java para obter o próximo elemento da iteração Delphi - Como calcular MDC em Delphi |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
|
1º lugar: Java |
