Exportar dados de uma tabela para outra em uma consulta

[wagnermarinsjc]

Boa noite a todos.
Sou iniciante em aplicações do LibreOffice Base.

Como faço para exportar dados de uma tabela para outra?

Ex: Eu tenho duas tabelas (Cadastro e ReceberDados). Quero criar consulta que ao chamá-la ela exportasse os dados contidos na tabela cadastro para a tabela ReceberDados.

Obs. Eu fiz um teste no Access utilizando o seguinte código e deu certo:
INSERT INTO ReceberDados ( nome, sobrenome, cidade )
SELECT cadastro.nome, cadastro.sobrenome, cadastro.cidade
FROM cadastro;

Quando tentei usar esse método no base não funcionou.
Desde já agradeço a todos.

[Grafeno]

Boa noite

Para executar instruções INSERT INTO no Base é preciso ir em Ferramentas > SQL… e colar a instrução em “Comando a executar”.

Além disso, o nome dos campos e da tabela devem vir entre aspas:

INSERT INTO "ReceberDados" ( "nome", "sobrenome", "cidade" ) SELECT "cadastro"."nome", "cadastro"."sobrenome", "cadastro"."cidade" FROM "cadastro";

---

Complementando…

Associe a macro ao evento Executar ação do botão de comando:

Sub ExportarDados()
Dim oBanco As Object, oConexao As Object, oSQL As Object
Dim sSQL As String

   ' Iniciar os objetos '
   oBanco = ThisDataBaseDocument
   oConexao = oBanco.CurrentController.ActiveConnection
   oSQL = oConexao.createStatement()

   ' Instrução SQL '
   ' O nome da tabela e dos campos devem vir dentro de duas aspas "" "" '
   ' para o comando ser executado  '
   sSQL = "INSERT INTO ""ReceberDados"" ( ""nome"", ""sobrenome"", ""cidade"" ) SELECT ""cadastro"".""nome"", ""cadastro"".""sobrenome"", ""cadastro"".""cidade"" FROM ""cadastro"" " 
   
   ' Excutar a Instrução SQL '
   oSQL.Execute( sSQL )
   
   MsgBox "Operação concluída!"
End Sub

Atte,

[wagnermarinsjc]

Boa tarde Grafeno.

Obrigado pela dica, funcionou quando executei.
Teria como usar esse método em macro?
Pôs eu queria utilizar através de um botão de comando como eu fazia no access.

grato.

[Grafeno]

Wagner, então, veja se a macro te atende. Se positivo, não esqueça de marcar a resposta como correta clicando em √ no canto superior esquerdo da resposta.