==>> Ajuda em botão de acréscimo com SQL <<==

Question

 

Amigos estou com um proje

to necessita de um botão de acréscimo,

Sei que tem uma opção que faz isso na contulta de acréscimo porem a mesma só faz uma copia de toda tabela.

------------------------------------------------------------------

Caracteristicas do banco
2 tabelas / TBL_CENTRAL , TBL_VENDA .

Amigos quero fazer um botão que ao clickar ele delete da TBL_CENTRAL o dado atual do formulario e copie o mesmo para TBL_VENDA ,
A possibilidade de fazer isso sem que aparece aquelas mensagems de autorização.

Eu consegui fazer um codigo sql no evento ao clicar mais ele só copia  da tabela atual o campo código,
pretendo que ele copie mais como posso fazer isso???

 

 Comando298_Click()
Dim
 sql As
 String


sql = "INSERT INTO tbl_venda (Código) VALUES ("
& Me
.Código.Value & ");"

CurrentDb.Execute sql
End

 Sub

 

Desde ja agradeço ajuda de todos.