AUTO SOMA
Olá pessoal!
Não estou conseguindo fazer uma auto soma de itens em uma tabela. Os dados estão organizados na tabela da seguinte forma:
Preciso fazer um loop que resulte o quantitativo de cada item, porém de uma vez só. Observe que os itens se repetem. Desde já agradeço.
ns id item qtde
1 5 EMB-1 300
1 5 COB-1 300
1 5 ADE-1 300
1 5 TA-1 300
1 5 FRA-1 300
1 11 COB-2 400
1 11 EMB-1 400
1 11 ADE-1 400
1 11 TA-1 400
1 11 FRA-1 400
1 15 EMB-1 400
1 15 COB-3 400
1 15 ADE-1 400
1 15 TA-1 400
1 15 FRA-1 400
Não estou conseguindo fazer uma auto soma de itens em uma tabela. Os dados estão organizados na tabela da seguinte forma:
Preciso fazer um loop que resulte o quantitativo de cada item, porém de uma vez só. Observe que os itens se repetem. Desde já agradeço.
ns id item qtde
1 5 EMB-1 300
1 5 COB-1 300
1 5 ADE-1 300
1 5 TA-1 300
1 5 FRA-1 300
1 11 COB-2 400
1 11 EMB-1 400
1 11 ADE-1 400
1 11 TA-1 400
1 11 FRA-1 400
1 15 EMB-1 400
1 15 COB-3 400
1 15 ADE-1 400
1 15 TA-1 400
1 15 FRA-1 400
Qual banco?
Access 2007
Select sum(qtde) as total from tabelaou com agrupamento por id e item:
Select sum(qtde) as total from tabela group by id, item
Mais ou menos assim.
[txt-color=#e80000]select id, sum(qtde) as qtde from SuaTabela Group by id[/txt-color]
[txt-color=#e80000]select id, sum(qtde) as qtde from SuaTabela Group by id[/txt-color]
Obrigado a todos !
Não deixe de encerrar o tópico, pois isso evita que novos usuários postem nele e reative-o entre os cabeças da lista.
Vlw.
Vlw.
Tentei aqui de várias formas sem sucesso...
Será que a instrução está correta ?
dim total as integer
Conectar
Set rsAUX.ActiveConnection = dbFab
rsAUX.Open [Ô]Select id, item, sum(qtde) as total from saida_aux group by id, item[Ô]
msgbox total [ô] testando o retorno da autosoma
Será que a instrução está correta ?
dim total as integer
Conectar
Set rsAUX.ActiveConnection = dbFab
rsAUX.Open [Ô]Select id, item, sum(qtde) as total from saida_aux group by id, item[Ô]
msgbox total [ô] testando o retorno da autosoma
Sintaticamente me parece correta.
Sua variável [Ô]total[Ô] não está recebendo nada nesse código. Faça assim:
Obs: Não se esqueça que com o agrupamento (group by) pode-se vir mais de um registro na consulta.
msgbox rs.Fields([Ô]total[Ô]).ValueObs: Não se esqueça que com o agrupamento (group by) pode-se vir mais de um registro na consulta.
Tópico encerrado , respostas não são mais permitidas