Bom dia,
Estou com um sistema em Excel onde está conectado ao banco de dados Access e preciso fazer um Select Where usando os parâmetros de uma célula do Excel
segue exemplo abaixo:
- No bando de dados do Access tenho a tabela [tbFaturamento], onde quero consultar os campos Ano [Data_de_Emissao], Mês [Data_de_Emissao], Contar os [CTRC] , Somar [Quantidade_de_Volumes], Somar [Cubagem_em_m3], Somar [Peso_Calculado_em_Kg], Somar [Valor_da_Mercadoria] e Somar [Valor_do_Frete] contudo quero que me apresente apenas valores que forem de uma [Unidade_Emissora] que está especificada no campo "B6" da aba do Excel "Anual" e também tenha o [Tipo_de_Baixa] diferente de 'CANCELADO'
e não me apresente valores repetidor de Ano e Mês.
O código que criei ficou assim:
sQuery = " SELECT YEAR(F.[Data_de_Emissao]), MONTH(F.[Data_de_Emissao]), COUNT(F.[CTRC]), " & _
"SUM(F.[Quantidade_de_Volumes]), SUM(F.[Cubagem_em_m3]), SUM(F.[Peso_Calculado_em_Kg]), " & _
"SUM(F.[Valor_da_Mercadoria]), SUM(F.[Valor_do_Frete])" & _
"FROM tbFaturamento F " & _
"WHERE F.[Unidade_Emissora] =" & Sheets("Anual").Range("B6").Value & _
" AND F.[Tipo_de_Baixa] <> 'CANCELADO' " & _
"GROUP BY YEAR(F.[Data_de_Emissao]), MONTH(F.[Data_de_Emissao]) "
Contudo está apresentando erro, mas quando especifico a [Unidade_Emissora] diretamente no código como no exemplo abaixo o mesmo código funciona...
sQuery = " SELECT YEAR(F.[Data_de_Emissao]), MONTH(F.[Data_de_Emissao]), COUNT(F.[CTRC]), " & _
"SUM(F.[Quantidade_de_Volumes]), SUM(F.[Cubagem_em_m3]), SUM(F.[Peso_Calculado_em_Kg]), " & _
"SUM(F.[Valor_da_Mercadoria]), SUM(F.[Valor_do_Frete])" & _
"FROM tbFaturamento F " & _
"WHERE F.[Unidade_Emissora] = 'BEL' " & _
" AND F.[Tipo_de_Baixa] <> 'CANCELADO' " & _
"GROUP BY YEAR(F.[Data_de_Emissao]), MONTH(F.[Data_de_Emissao]) "
Como posso usar o valor da célula "B6" da aba do Excel "Anual" para atribuir na Where ?????
Postado : 14/07/2017 8:16 am