[resolvido] Usar Ribbons para botao rodar consulta

[ticiano]

Ola Avelino,

Eu estou desenvolvendo uma solucao com o Maestro e utilizando a ribbons, gostaria de criar um botao que migrasse o resultado de uma consulta para novas linhas em uma nova tabela.

Eu vejo que temos o seguinte codigo para dar funcionalidades aos botoes no modulo "mod_ribbon":

para formularios: Case "btProgramarIntermediarios"
DoCmd.OpenForm "tblProgramacaoSubprodutos"

para reports: Case "btRelacaoDiariaMatPrimaSubprodutos"
DoCmd.OpenReport "tblProgramacaoSubprodutos_1-1", acViewPreview
DoCmd.Maximize

Como eu faria com uma consulta de acrescentar? Esse video, inclusive, explica a funcionalidade (https://www.youtube.com/watch?v=tFvye4tLQUM)

Abracos

[Avelino Sampaio]

Ticiano,

experimente o seguinte comando para o botão da ribbon:

Código:

currentdb.Execute "NomeDaSuaConsultaAcrescimo"

Aguardamos

[ticiano]

Eu criei um formulário e uma macro com o comando OpenQuery (sendo que a query já tem o comando de acrescentar dados em uma tabela), e deu tudo certo.

Obrigado!