Excel VBA Planilha relatório decompor ocorrência grupos
Este Macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), extrai, separa, decompõe, valores para uma
determinada coluna referente as repetições ocorridas nos lançamentos originais.
Espero que o exemplo possam lhe ser didaticamente util.
Fiquem com Deus, bons estudos!
‘//===============’
Sub sbx_decompor_dados()
Dim vPalavra As New Collection ‘observe que vamos usar o new colletion (Ajuda – tecle na palavra + f1)
Dim vItem
Dim vColuna As Integer
Dim vLinha As Integer
vColuna = 6
vLinha = 2
On Error Resume Next
For Each c In Range(“a2:a” & Range(“a65000”).End(xlUp).Row)
vPalavra.Add c.Text, c.Text
Next c
For Each vItem In vPalavra
Cells(vLinha, 5).Value = vItem
For Each c In Range(“a2:a” & Range(“a65000”).End(xlUp).Row)
If c.Value = vItem Then
Cells(vLinha, vColuna).Value = c.Offset(0, 1).Value
vColuna = vColuna + 1
End If
Next c
vColuna = 6
vLinha = vLinha + 1
Next vItem
End Sub
‘//===============’
Sub sbx_limpar_teste()
X = Range(“a” & Rows.Count).End(xlUp).Row + 1
Range(“E2” & “:I” & X).ClearContents
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.
Compre pelo PagSeguro | Compre pelo PayPal | |
Material Didático: Curso Excel VBA Expert |
Baixe o exemplo de planilha contendo os macros acima: |
Planilha Excel VBA relatório decompor ocorrência grupos |
<< Download Link : Verifique também a Caixa de Itens Excluídos >> |
Planilha Excel VBA relatório decompor ocorrência grupos