Home Excel - Dicas Microsoft Excel VBA Excel VBA - Tabela Dinamica vba tabela dinamica subtotal passo a passo

vba tabela dinamica subtotal passo a passo

E-mail Imprimir PDF

Saberexcel - o Site das Macros
Macro do Aplicativo Microsoft Excel VBA, atualiza uma tabela dinâmica, neste exemplo inseri um passo a passo com shapes(autoformas) e imagens para um melhor entendimento de tabela dinâmica, acho que poderá ajudar.

Sub Atualizar_Tabela_Dinamica()
Range("C5").Select

ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"'Tabela Dinamica'!R5C2:R13C4").CreatePivotTable TableDestination:="", _
TableName:="Tabela dinâmica17", DefaultVersion:=xlPivotTableVersion10

ActiveSheet.PivotTableWizard TableDestination:=ActiveSheet.Cells(3, 1)
ActiveSheet.Cells(3, 1).Select

With ActiveSheet.PivotTables("Tabela dinâmica17").PivotFields("Produto")
.Orientation = xlRowField
.Position = 1
End With

With ActiveSheet.PivotTables("Tabela dinâmica17").PivotFields("Cliente")
.Orientation = xlRowField
.Position = 2
End With

With ActiveSheet.PivotTables("Tabela dinâmica17").PivotFields("Valor")
.Orientation = xlRowField
.Position = 3
End With

ActiveSheet.PivotTables("Tabela dinâmica17").AddDataField ActiveSheet. _
PivotTables("Tabela dinâmica17").PivotFields("Valor"), "Soma de Valor", xlSum

ActiveWorkbook.ShowPivotTableFieldList = False
Range("H3").Select
End Sub



Aprenda sobre o Aplicativo
Microsoft Excel VBA - Saberexcel



   Baixe o exemplo de planilha contendo o passo a passo e macros acima
 vba tabela dinamica subtotal passo a passo (654.87 kB 2010-11-28 09:28:52)

Última atualização em Ter, 23 de Agosto de 2011 09:16  

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

Pesquisa Google SaberExcel

Publicidade Google

Publicidade

Rastreamento Correios

Digite o número do SEDEX conforme o exemplo:
Correios do Brasil

Assinatura SaberExcel

Google Associados

Depoimentos

Visitantes SaberExcel

Excel VBA Estudos®
mod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_counter
mod_vvisit_counterHoje4014
mod_vvisit_counterOntem4432
mod_vvisit_counterEsta Semana30537
mod_vvisit_counterSemana passada46212
mod_vvisit_counterEsse mês17743
mod_vvisit_counterMês passado153723
mod_vvisit_counterTodos10440572
Aprenda MS Excel VBA

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA