[Resolvido]Criar tabela e acrescentar dados via VBA

Senhores,

Atualmente tenho duas consultas, sendo a consulta "cns_Maiorcriatb" para criar uma tabela e a outra consulta "Cns_MenorSuboutrosacrestb" acrescenta a tabela criada.

Atualmente utilizo um botão para acionar a execução das duas consultas, mas gostaria de fazer todo o processo via VBA para criar as consultas e criar e acrescentar a tabela via VBA de modo que o processamento fosse mais rápido e transparente para o usuário. Como devo proceder?


Em modo sql as consultas são:

cns_Maiorcriatb

SELECT [Programacao de Pagamento - Relatorio PR].[DATA PREVISTA], [Programacao de Pagamento - Relatorio PR].[RAZÃO SOCIAL/NOME], Sum([Programacao de Pagamento - Relatorio PR].[VALOR LIQUIDO]) AS [SomaDeVALOR LIQUIDO] INTO TabRelPresidencia
FROM [Programacao agrupar data - Relatorio PR] LEFT JOIN [Programacao de Pagamento - Relatorio PR] ON [Programacao agrupar data - Relatorio PR].[DATA PREVISTA] = [Programacao de Pagamento - Relatorio PR].[DATA PREVISTA]
GROUP BY [Programacao de Pagamento - Relatorio PR].[DATA PREVISTA], [Programacao de Pagamento - Relatorio PR].[RAZÃO SOCIAL/NOME]
HAVING (((Sum([Programacao de Pagamento - Relatorio PR].[VALOR LIQUIDO]))>=30000))
ORDER BY [Programacao de Pagamento - Relatorio PR].[DATA PREVISTA];


Cns_MenorSuboutrosacrestb

INSERT INTO TabRelPresidencia ( [RAZÃO SOCIAL/NOME], [DATA PREVISTA], [SomaDeVALOR LIQUIDO] )
SELECT "Outros" AS Outros, cns_Menor.[DATA PREVISTA], Sum(cns_Menor.[SomaDeVALOR LIQUIDO]) AS [SomaDeSomaDeVALOR LIQUIDO]
FROM cns_Menor
GROUP BY "Outros", cns_Menor.[DATA PREVISTA];

Donizeth,
Bom dia!

Essa necessidade é para poder gerar algum relatório? Pois se for você pode criar apenas uma vez a tabela sendo ela Temporária e todas as vezes que for gerado o relatório você exclui e insere os dados na tabela de acordo com a sua necessidade.

Att,
Leandro Fonseca.

Leandro Fonseca,

Sim é para gerar o relatório. Como faço para criar a tabela temporária? Nessa tabela precisarei de dados de duas consultas, por isso que estou gerando a consulta criar tabela e depois uma de acrescimo, mas gostaria de deixar isso em VBA para não apresentar mensagem na tela para o usuário.

Você poderia auxiliar em meu bd de exemplo?

Donizeth,

Uma dúvida, as duas consultas possuí as mesmas colunas?
Se sim poderá ser usado a mesma tabela, caso contrario necessário usar duas tabelas.

Att,
Leandro Fonseca.

Donizeth,

Estou vendo o seu caso, porem o relatório que você quer ao fazer uma CrossTab aplicando o filtro por período exemplo:

Data Inicial: 01/01/2011
Data Final: 31/12/2011

E o sistema possuir registro que satisfaça a condição, será criado uma coluna para cada dia do mês ou seja 365 colunas!

É isso mesmo que o sistema deverá fazer?

Pois criar a tabela temporária seria apenas para ajudar na inclusão dos registro ao aplicar o filtro, ou seja, toda vez que você for prever o relatório será excluído os dados da tabela e inserido novamente.

Talvez o resultado esperado não seja exatamente esse ou não ficou muito claro isso pra mim...

Att,
Leandro Fonseca.

Leandro,

O meu form no bd que tenho já possui uma trava para limitar a apenas 7 dias o relatório.

Será tratado no tópico tabela.