[Resolvido]Função tabela dinâmica access e excel

Caros,
Boa Tarde!

Estou tentando gerar tabelas dinâmicas em Excel através de uma consulta criada em Access, porem a consulta(CONSULTA_TESTE) não aparece como opção para seleciona-la.

Nesta consulta existe um calculo de dias uteis utilizando um modulo de classe, e acredito que esteja ai o problema.

Alguém pode salvar meu Carnaval..?rs

Anexei o exemplo.

Dilson,
Boa Tarde!

Eu não entendi sua resposta...você conseguiu "enxergar" a consulta chamada "CONSULTA_TESTE"?

Eu estou tentando vincular uma Tabela Dinâmica no Excel com as informações da consulta chamada "CONSULTA_TESTE", porem a mesma não aparece como uma opção de fonte de dados, quando eu seleciono o banco de dados "Base_Fin"...anexo prints para mostrar:

Será que é por causa do modulo que existe dentro do Banco de dados?

Atenciosamente,
E.Mosquete!

Dilson,
Bom Dia!

Muito Obrigado pela atenção e ajuda, vou continuar tentando e aguardando a ajuda de vcs.

Atenciosamente,
E.Mosquete!

Boa tarde!

Não sei explicar ao certo o que limita a conexão da consulta com o excel, porém, creio que seja algo relacionado ao uso da função weekday na clausula ON do Join;

Analisei sua consulta e vi que faz cruzamento com tabela de dias da semana para pegar a descrição do dia, por exemplo seg, ter, etc. Para eliminar esta necessidade sugiro que utilize a função nativa format.

Exemplo: Format([campo com a data], "ddd") AS [Dia da Semana]

Eu fiz um teste aqui eliminando o cruzamento com a tabela dias da semana e a consulta apareceu na lista de objetos no excel.

Philipp.moreira,
Boa Tarde!

Eu segui sua orientação porem, aqui ainda não aparece a consulta chamada "CONSULTA_TESTE" no Excel...

Tentei tbm colar o código SQL nas propriedades da conexão, porem é apresentado o erro na Função DTS, que foi construída no modulo.

Não sei mais o que fazer...

Agora estou tentando adaptar a função DataDiff a minha necessidade, porem esta muito difícil, tendo em vista que preciso determinar apenas os dias uteis tirando o Sábado, Domingo e feriados. Por isso criei aquela tabela de feriados e utilizei o módulo para conseguir contar certo os dias úteis.

Se souber alguma forma de utilizar o DateDiff, utilizando a tabela de feriados para excluir esses dias, me ajudaria muito, pois assim não precisaria do módulo (com a função DTS, função que acredito ser o problema para importar a informação para o excel)....

Grato pela atenção.

Atenciosamente,
E.Mosquete!

E.Mosquete,
boa noite!

Segue anexo todas as minhas tentativas de recriar a query para ser possível a conexão entre o Access e Excel, porém, não consegui.

Como alternativas eu penso que existem mais duas possíveis:

1 - Setar um recordset com uma consulta básica e incluir por VBA os demais campos que demandam uma lógica de negócio/processamento e após isto, na "mão" setar os valores na planilha excel que deseja alimentar;

2 - Criar um vínculo entre Access e Excel através do assistente, vinculando uma consulta básica/simples, e setar no excel fórmulas que realizem o processamento dos demais campos que demandam um inteligência de negócio;

Já usando Datediff realmente não sei como realizar o cálculo de somente dias úteis, considerando inclusive feriados.


Espero que algum dos demais membros possam auxilia-lo melhor.

Philipp,

Obrigado pela atenção!

Ainda não consegui solucionar meu problema. Vou pesquisar algumas consultas para ver como importar essa base do access para o Excel, pois o quando não utilizo os módulos a consulta aparece, entretanto os valores dos dias úteis estão errado (contando finais de semanas e feriados).

Caso encontre alguma solução postarei aqui, mas desde já agradeço pela força..

Caros,
Bom dia!

Gostaria de informar que consegui resolver o meu problema com o seguinte código:

datediff('d',[data inicial],[data final]) - (SELECT COUNT(*) FROM tblFeriados where ferDATA >= [data inicial] AND ferDATA <[data final]) AS [nome coluna],

Somente lembrando que, é necessário ter uma tabela (tblFeriados) com as datas (ferDATA) para que o código não considere as mesmas.

Atenciosamente,
E.Mosquete!