[Resolvido]Importar dados de uma outra tabela, mas com campos diferentes.

Prezados,

Recorro ao conhecimentos de todos para sanar uma duvida minha.
Tenho uma tabela (tbl1), que contem alguns dados que eu gostaria e necessito importar para a minha tabela (tbl2).

Campos normais como....nome, endereço, fone existentes nas duas.

Como são muitos dados, algo em torno de 5.500 registros,gostaria eu de saber qual a melhor maneira de importar esses dados de uma tabela (tbl1) para a outra (tbl2) ?

Desde já, sou grato a todos.

Tente, no clique de um botão:

Dim rs As Recordset, L As Double
Set rs = CurrentDb.OpenRecordset("Tabela1")

For L = 1 To DMax("Código", "Tabela1")

CurrentDb.Execute "INSERT INTO Tabela2(Campo1, Campo2, Campo3) VALUES('" & rs!Campo1 & "', '" & rs!Campo2 & "', '" & rs!Campo3 & "')"

Next

rs.Close
Set rs = Nothing

Mais ou menos por aí

Outra opção é
Currentdb.execute "UPDATE tbl1 LEFT JOIN tbl2 ON tbl1.CampoX=tbl2.CampoY SET tbl2.CampoA=tbl1.CampoA,tbl2.CampoB=tbl1.CampoB...

Senhores, dou por encerrado o tópico, deu certo dos dois modos...
Sou grato a todos.