Boa tarde pessoal
Sou novo em VBA e estou fazendo um balanço patrimonial.
Gerei com um comando SQL (em VBA) um relatório conforme exemplo Abaixo:
Mês Nome Valor
05 Caixa 500,00
05 Banco 800,00
06 Caixa 650,00
06 Banco 350,00
07 Estoque 620,00
Gostaria de uma comando que fizesse um pivot neste relatório, para que ele ficasse assim
meses
Nome 05 06 07
Caixa 500,00 650,00 0
Banco 800,00 350,00 0
Estoque 0 0 620,00
Este é o comando SQL onde gerei o primeiro relatório
[depois que conectei o banco de dados da planiliha]
Set RSt2 = Db2.OpenRecordset("Select Mês, Ano, Conta_Deb, sum(Valor) as valore from (Select MONTH(DATA) AS Mês, Year(Data) as Ano, Conta_Deb, valor From [Banco-01$] where Débito > 0 union all Select MONTH(DATA) As Mês, Year(Data) as Ano, Conta_Deb,
valor From [Banco-02$] where Débito > 0 union all Select MONTH(DATA) As Mês, Year(Data) as Ano, Conta_Deb, valor From [Banco-03$] where Débito > 0 union all Select MONTH(DATA) As Mês, Year(Data) as Ano, Conta_Deb, valor From [Banco-04$] where Débito
> 0 )group by Conta_Deb, Mês, ano order by Mês, sum(Valor) desc ")
Agradeço a atenção e isso será de grande ajuda.
Abraços
|