Não exibir mensagem depois DoCmd.RunSQL

Boa noite a todos....

Tenho um evento ao sair que executa o código abaixo
DoCmd.RunSQL "INSERT INTO Tb_copia_referencia(Copia_ref_entrada_saida) SELECT Ref_cor_tamanho FROM Tb_venda_produtos"

o problema é que depois aparece uma mensagem que você está preste acrescentar 3.. linhas(s) com botão (Sim) e (Não)

gostaria que essa mensagem não aparecesse e sempre escolhesse a opção (Sim)

tem como ?

Olá, boa noite!

Duas opções para resolver o problema...
1ª)
Currentdb.execute "INSERT INTO Tb_copia_referencia(Copia_ref_entrada_saida) SELECT Ref_cor_tamanho FROM Tb_venda_produtos"

2ª)

DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO Tb_copia_referencia(Copia_ref_entrada_saida) SELECT Ref_cor_tamanho FROM Tb_venda_produtos"
DoCmd.SetWarnings True

Bom dia wellingtoneo,

As duas opções que você passou, funcionou perfeitamente, muito obrigado pela ajuda

Ok, gentileza encerrar o tópico como resolvido. Obrigado!