Então inseri essa resposta porque num tinha entendido direito o tópico... Mas já que num da para excluir então vou dar uma sugestão também (apesar de achar que a da Andreia_sp funciona)... tenta isso:
sql = "SELECT A.codProduto, A.produto, A.Valor, A.Qtdade, B.SubTotal, C.Total FROM Produtos A, (SELECT produto, (SUM(Valor*Qtdade)) as SubTotal FROM Produtos group by produto) B, (SELECT SUM(Valor*Qtdade) as Total FROM Produtos) C WHERE A.produto = B.produto;"
Testei no access e funciona... B.SubTotal retorna o valor de cada registro vezes a quantidade B.Total retorna a soma de todos os registros Se quiser te mando o db onde testei essa consulta...