VBA Access - Copiando query com outro nome programaticamente - How to Programmatically Copy a Query with a New Name

Hello Folks!

Não raro ocorre a necessidade de copiarmos o conteúdo de uma query existente para outra com um nome diferente. Quando esta necessidade surgir, não precisará perder tempo em saber como fazê-lo, abaixo está o caminho.

Dica: Uma forma similar pode ser utilizada para copiar quaisquer objeto do MS Access.

 Sybase's PROCs 

VBA Access - Execute Stored Procedure with VBA in Sybase

VBA Excel - Execute Stored Procedure with VBA in Sybase

Cria uma Stored Procedure

Execute uma Stored Procedure com Parâmetro

Atualizar Dados Usando uma Stored Procedure

Deletar Registros com uma Stored Procedure

Transações Usando Stored Procedure

Recuperar Múltiplos Resultados 

Exemplo Básico de Execução de Stored Procedure

Executando Stored Procedure com Parâmetros de Entrada

Capturando Resultados de uma Stored Procedure

Executando Stored Procedure com Parâmetros de Saída

Executando Stored Procedure e Capturando Erros

 

Function CpyNQry(nQryNm As String, nQryNm As String) As Boolean
' André Bernardes 04/2009 bernardess@gmail.com
' Copia uma query qualquer para outra com outro nome.

CurrentDb().CreateQueryDef nQryNm, CurrentDb().QueryDefs(QryNm).SQL

Let CpyNQry = (Len(CurrentDb().QueryDefs(nQryNm).Name) > 0)

Application.RefreshDatabaseWindow
End Function

 Clique aqui e nos contate via What's App para avaliarmos seus projetos 

Envie seus comentários e sugestões e compartilhe este artigo!

brazilsalesforceeffectiveness@gmail.com

 Série de Livros nut Project 

  

 PUDIM PROJECT