CREAT TABLE no VBA

Senhores bom dia,
Não estou conseguindo executar o seguinte comando adicionado ao click de botão vocês podem me ajudar a fazer isso.

Dim CREATE_TABLE As String

CREATE_TABLE = "CREATE TABLE 'BKP_' & FORMS!BKP_TABELAS & AS (SELECT * FROM & FORMS!BKP_TABELAS)"

DoCmd.RunSQL CREATE_TABLE

Está aparecendo erro de Sintaxe CREATE TABLE

Muito obrigado

Olá, seja bem vindo ao fórum!

Eu costumo fazer assim:

Código:

CurrentDb.Execute "CREATE TABLE tblTeste (Código COUNTER CONSTRAINT MyFieldConstraint PRIMARY KEY, cmpSINGLE SINGLE, cmpDOUBLE DOUBLE, cmpINTEGER INTEGER, cmpLONG LONG, cmpBYTE BYTE, cmpYESNO YESNO, cmpDATETIME DATETIME, cmpMONEY MONEY, cmpLONGTEXT LONGTEXT, cmpLONGBINARY LONGBINARY, cmpCHAR CHAR(15), cmpVARCHAR VARCHAR(8));"

Coloque os nomes dos campos contendo o tipo de campo para você ver na tabela depois como eles ficam.

Obrigado pela ajuda,

É que estou querendo usar o mesmo comando que é possivel no Oracle, desta forma eu estarei criando uma tabela usando a estrutura e dados de outra.

Explique melhor a necessidade. As sintaxes são diferentes de um SGBD para outro.

A minha necessidade é de criar um backup de uma determinada tabela, efetuando uma cópia dela utilizando BK_nomedatabela.
Pensei em utilizar o camando que passei, porque nele é possivel fazer uma copia com estrutura e dados.

Obrigado

Você pode copiar essa tabela ao invés de criar outra:

DoCmd.CopyObject , "NovoNome", acTable, "NomeAntigo"
MsgBox "Tabela copiada", vbInformation, "Sucesso"

Muito obrigado amigo,

Com esse comando eu já consigo solucionar o meu problema.

Abraços;

Só que tem um detalhe a ser considerado. Dessa forma que está fazendo, você vai ficar repetindo dados em um mesmo banco, o que irá fazer ele aumentar de tamanho exponencialmente, diminuindo bastante o tempo de vida útil do mesmo. O melhor é criar uma cópia de backup do próprio banco.