Fóruns
Microsoft Excel - 2...
2024 - Integração E...
Retornar Soma do Ac...
 
Notifications
Clear all

Retornar Soma do Access para VBA

 
2024 - Integração Excel & Access 2024
Post Recente por wfranca 8 anos atrás
7 Posts
2 Usuários
0 Reactions
2,388 Visualizações
RSS
 wfranca
(@wfranca)
Posts: 297
Honorable Member
Topic starter
 

Pessoal boa noite.

Estou com alguns problemas com retorno da soma de alguns critérios do meu banco de dados em access

Seguinte eu tenho os seguintes dados em access: (exemplo)

CENTRO- ------- - M2 ----------MÊS
Tear01 -------- 200 ---------JANEIRO
Tear02 -------- 100 ---------FEVEREIRO
Tear03 -------- 100 -------- MARÇO

no meu Form eu tenho uma combobox que carrega o centro e uma combobox que carrega o mês e uma textbox onde quero que apareça a soma do meu banco de dados.

Anexei os modelo para melhor entendimento.

TESTE_SOMA (2).zip
 
Postado : 27/07/2016 8:02 pm
 tarcelles
(@tarcelles)
Posts: 0
New Member
 

Bom dia.

So faltou dizer uma coisa, a soma de que ?

 
Postado : 28/07/2016 4:58 am
 wfranca
(@wfranca)
Posts: 297
Honorable Member
Topic starter
 

Ops.. A soma da columa M2 (metros Quadrados)

 
Postado : 28/07/2016 4:59 am
 tarcelles
(@tarcelles)
Posts: 0
New Member
 

Se for o M2 coloca isso aqui no click do bota calcular, ou chame o método 'somar' no botao calcular.

Private Sub SOMAR()

Call Conecta
ComandoSQL = "SELECT COUNT(M2) AS SOMA FROM TB_DADOS"
Set consulta = banco.OpenRecordset(ComandoSQL)


Me.txt_M2.Text = consulta("SOMA")



                    
                    
                    
End Sub
 
Postado : 28/07/2016 5:12 am
 wfranca
(@wfranca)
Posts: 297
Honorable Member
Topic starter
 

mas no caso.. eu tenho critérios..

uma combobox que filtra o centro e uma que filtra o mês.. assim ele me tras o resultado referente ao M2

 
Postado : 28/07/2016 5:25 am
 tarcelles
(@tarcelles)
Posts: 0
New Member
 

è so utilizar o Where... por exemplo.

ComandoSQL = "SELECT COUNT(M2) AS SOMA FROM TB_DADOS WHERE CENTRO='" & ME.CMBCENTRO.VALUE & " ' "
 
Postado : 28/07/2016 5:57 am
 wfranca
(@wfranca)
Posts: 297
Honorable Member
Topic starter
 

Deu um erro... sabe oq pode ser?

 
Postado : 28/07/2016 10:05 am
Forum Jump:
  Tópico Anterior
Próximo Tópico