Usar o VBA para Encontrar o Valor Máximo na Planilha

Excel VBA - Encontre o valor máximo no intervalo da planilha, com critérios em outra coluna. Se você pretende usar macros, pode entrar diretamente com o código a seguir.

Sub ShowMax()
    Dim TheMax As Double
    TheMax = WorksheetFunction.Max(range("A1:C3"))
    MsgBox TheMax
End Sub

Exemplo: se no momento em que você tem uma variável, G, que está sendo atualizada para cada nova célula, ou seja, para cada nova célula, pode verificar se o seu valor - sempre um inteiro, é maior do que G e nesse caso, atualize G para refletir isso. Esta outra opção de código a seguir mostra o resultado.

MAX WorksheetFunction

Código:
Sub GetMax ()
Dim lMax As Long
    lMax = WorksheetFunction.Max (Range ("A: B"))
End Sub
Confira Estas Planilhas de Excel
Lista de todas as planilhas do site. Confira estas planilhas Premium. Pacote de planilhas de Excel com 17. A melhor opção!
Ver Mais Detalhes Ver Mais Detalhes
Planilha de Custo de Obras para construção e reformas de imóveis. Mais vendida! Planilha de Cotação de Preços. Economize dinheiro comprando mais barato!
Ver Mais Detalhes Ver Mais Detalhes
Planilha de Orçamento de Obras 2.0. Exatamente o que você precisa para fazer o controle da obra. Planilhas de Controle de Estoque e Vendas. Ótima recomendação para estoques!
Ver Mais Detalhes Ver Mais Detalhes

Tags:

Edivaldo

Edivaldo

Edivaldo. Louco por funções e fórmulas de Excel, adoro fazer planilhas e compartilhar meus conhecimentos com as pessoas. Seja bem-vindo. Eu amo fazer isso e quero compartilhar com você!

2 Comentários
Mostrar Todos Mais Útil Classificação Mais Alta Classificação Mais Baixa Adicionar a sua avaliação
  1. Olá!

    Uma pequena dúvida: Fiz uma add-in em uma planilha (.xla) e a instalei ("suplementos"). Entretanto, ao abrir a planilha em outro computador (onde instalei a mesma add-in) em outro computador, o endereço do computador antigo foi mantido:
    ex:
    na planilha aberta no novo computador, em uma célula que contém uma função do add-in aparece:
    =’C:\ ….. \add-in\alfa.xla!wat(A2;A3)

    quando deveria aparecer apenas
    =wat(A2;A3)
    E, como o endereço da alfa.xla não é mais esse, a função wat dá erro. Tenho copiado o endereço errado(com "=") e mandado trocar por "=" em toda planilha. Mas isso tem evitado que outros a usem.

    V. já viu esse erro ou sabe porque ele aparece ou (melhor), como consertar?

    Obrigado
    Abraços
    Fernando

    • Olá aferoliv.
      Mudar os ícones ainda não encontramos, a não ser que exista alguns Add-ins de terceiros que faça isso, ou alguma programação VBA. Vou continuar procurando, mas se alguém souber, por favor deixe a dica neste comentário.

Deixe uma Comentário

Tudo Excel
Logo
Shopping cart