Este código irá destacar os dez principais valores de uma seleção de células:
Sub TopTen()
Seleção.FormatConditions.AddTop10
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
Com Selection.FormatConditions( 1 )
.TopBottom = xlTop10Top
'Altere a classificação aqui para destacar um número diferente de valores
.Rank = 10
.Percent = False
End With
With Selection.FormatConditions( 1 ).Font
.Color = -16752384
.TintAndShade = 0
Terminar com
Seleção.FormatConditions ( 1 ).Interior
.PatternColorIndex = xlAutomatic
.Color = 13561798
.TintAndShade = 0
Terminar com
Selection.FormatConditions ( 1 ).StopIfTrue = False
End Sub
Você pode ajustar facilmente o código para destacar diferentes números de valores.
Parabéns! Como você ainda está lendo isso, você está realmente interessado em aprender VBA. Como você já viu, a linguagem de programação VBA é extremamente útil e pode nos poupar muito tempo. Espero que você tenha achado essas informações úteis e as use para se tornar um mestre em MS Excel, VBA e software de computador em geral.
Nenhum comentário:
Postar um comentário