Comando VBA para calcular amplitude entre 3 valores

[Marco_Bertolani]

Olá,

Preciso de um comando VBA para calcular a amplitude entre valores dispostos em 3 colunas da planilha Excel. Exemplo:

tenho um valor na célula A1 = 10
tenho um valor na célula B1 = 12
tenho um valor na célula C1 = 7

Preciso que o comando calcule a diferença entre o maior e o menor valor dessas 3 colunas (12 - 7) e me retorne o resultado na célula D1.

Se alguém puder me ajudar, agradeço!

Marco.

[joseA]

Código: Selecionar todos

Sub Diferença()
Maior = Application.WorksheetFunction.Max(Plan1.Range("A1:C1"))
Menor = Application.WorksheetFunction.Min(Plan1.Range("A1:C1"))
MsgBox Application.WorksheetFunction.Sum(Maior - Menor)
End Sub

[netocasaroli]

Marco,

Além da solução enviada pelo colega JoseA, você pode, se quiser fugir do VBA, usar a seguinte fórmula: =MÁXIMO($A$1:$C$1)-MÍNIMO($A$1:$C$1).