Ae pessoal, acontece cada uma... não sei o que está acontecendo mas olha o pau que ta dando:
Run-time error 3122.... you tried to execute a query that doesn´t include the specified expression 'CodPedido' as parte of an aggregate function...
olha a micharia do select:
Select Sum(VenValTotal) As TotalVendido, CodPedido From VendaItem Where CodEmpresa=" & Empresa & " And CodVenda=" & N_Venda
por que isto ? algém sabe me informar ?