Página 1 de 1
Vba para somar valores iguais e mais
Enviado: 26 Nov 2016 às 23:21
por Super385011
Boa Noite
Criei esta planilha baseado em videos do youtube mas não consegui fazer algumas macro e gostaria de ajuda para resolver
Aqui esta a planilha
https://www.sendspace.com/file/10pt5nl
O que estou querendo fazer esta na planilha com o nome de Fechamento. Gostaria que os códigos e valores iguais que se somem, e que possa gerar um relatório somente desta planilha com o nome seja a data atual.
Re: Vba para somar valores iguais e mais
Enviado: 27 Nov 2016 às 11:06
por alexandrevba
Bom dia!!
Porque não usar uma Tabela Dinâmica para isso?
Att
Re: Vba para somar valores iguais e mais
Enviado: 27 Nov 2016 às 13:27
por Super385011
Boa tarde
Eu quero tentar com vba primeiro
Re: Vba para somar valores iguais e mais
Enviado: 27 Nov 2016 às 16:14
por alexandrevba
Boa trade!!
Use o Gravador de Macro.
Código: Selecionar todosSub Macro1()
'
' Macro1 Macro
'
'
Range("L:M").Delete
Range("A1").Select
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"Fechamento!R1C1:R9C4", Version:=6).CreatePivotTable TableDestination:= _
"Fechamento!R1C12", TableName:="PivotTable1", DefaultVersion:=6
Sheets("Fechamento").Select
Cells(1, 12).Select
With ActiveSheet.PivotTables("PivotTable1").PivotFields("codigo")
.Orientation = xlRowField
.Position = 1
End With
ActiveSheet.PivotTables("PivotTable1").AddDataField ActiveSheet.PivotTables( _
"PivotTable1").PivotFields("quantidade"), "Sum of quantidade", xlSum
End Sub
Att
Re: Vba para somar valores iguais e mais
Enviado: 27 Nov 2016 às 22:59
por Super385011
Agora somou tudo mas preciso que os valores em dinheiro seja separado com a quantidade de cada um que foi vendido
o código 657 tem o valor de R$ 5,20 e o de R$ 6,00 como posso separa-los
Re: Vba para somar valores iguais e mais
Enviado: 28 Nov 2016 às 09:38
por Super385011
Consegui configurar como eu queria. Agora queria salvar um log da planilha Fechamento