Visual Basic para Aplicaciones - VB para Access

Mi problema es q estoy trabajndo con Access y casi todo lo estoy haciendo por el asistente pero ahora necesito el codigo de un par d instrucciones, y de VBA estoy cortito, aver si me podeis ayudar.Gracias.

1.-Eliminar todos los registros de una tabla.
2.- Copiar un registro de una tabla(elegido mediante un cuadro combinado por el usuario) a otra tabla con los mismos campos.

Gracias.

1- Si tu conexion se llama Cnn seria:
cnn.execute "DELETE FROM tabla" siendo tabla el nombre de tu tabla
2- Crea un recordset, si usas un datacombo:
dim rst as adodb.recordset
set rst=new adodb.recordset
rst.open "Select * from tabla1 where campo1=" & combo.boundtext
while not rst.eof
cnn.execute "INSERT INTO tabla2 (campo1,....,campoN) VALUES ( " &
rst!campo1 & "," & campo2 & "," & ..... & "," & campoN & ")"
rst.movenext
wend
set rst=nothing
haz de tener en cuenta que si el tipo de campo es texto el valor en SQL debe tener al principio y al final una comilla simple.
Saludos
Fran