Escola Saberexcel VBA Treinamentos - para quem precisa aprender macros ms excel vba

Esses macros do Aplicativo Microsoft Excel VBA(Visual Basic Application), retornam valores máximos e mínimos, referentes aos meses do ano,
relacionados na coluna(B) de determinada folha de planilha. Observe que o macro, contém código para deslocar esses dados extraídos para
determinada coluna(G) 'escolhida'. Espero que o exemplo possa lhe ser útil. Fique com Deus, Expedito Marcondes.
'- - - - - - - - - - - - - - - - - - - - - - - - -
NB - em programação (aprendizado) é de extrema importancia o dominio da matéria sobre Loops, e também como deslocar(propriedade offset())
dados pelos folhas de planilhas escolhendo linhas colunas e células para recepção de dados.
Temos dois trabalhos importantes para essa fase de conhecimento em programação e desenvolvimento:
1 - 120 Planilhas Microsoft Excel VBA sobre Loops (todos) como usar.
2 - Planilhas de treinamento deslocando dados pelas folhas de planilhas linhas e colunas, usando a propriedade offset e as instruções Loops.
'melhores informações Escola Saberexcel VBA Estudos, Treinamento com Macros, Fórmulas e Funções : 'Email-me"!
' - - - - - - - - - - - - - - - - - - - - - - --

Const s = "Valores mínimos extaídos"
Const b = "Valores máximos extraídos"
'- - - - - - - - - - - - - - - - - - -
Sub sbx_extrair_valores_maximos_meses()
For i = 1 To 12
vMaximo = 0
For J = 4 To Range("B65000").End(xlUp).Row
If Range("B" & J).Value = i And Range("C" & J).Value > vMaximo Then
vMaximo = Range("C" & J).Value
End If
Next J
Range("G" & (3 + i)).Value = vMaximo
Next i
[a].Value = b
End Sub
'- - - - - - - - - - - - - - - - - - -
Sub sbx_extrair_valores_minimos_meses()
For i = 1 To 12
vMinimo = 1000
For J = 4 To Range("B65000").End(xlUp).Row
If Range("B" & J).Value = i And Range("C" & J).Value < vMinimo Then
vMinimo = Range("C" & J).Value
End If
Next J
Range("G" & (3 + i)).Value = vMinimo
Next i
[a].Value = s
End Sub



Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções.