Anexar datos de un a tabla a otra accces

Para hacer lo que pides debes hacer lo siguiente:
1.- En el formulario que quieras (y si no creas uno en blanco) añades un botón de comando. Sacas sus propiedades y te vas a la pestaña Eventos->Al hacer click. Verás que ahí hay un pequeño botón de puntos suspensivos. Si haces click sobre él te aparecerá una ventana. Le dices que quieres generar código.
2.- Se te abrirá el editor de VB con dos líneas por defecto (Private Sub... y End Sub). No debes tocar esas líneas. En medio de ellas escribes el siguiente código:
...
Private Sub...
'Creamos las variables y los recordset que necesitaremos
Dim rst1 as Recordset, rst2 as Recordset
Dim vNum as Integer, vValor as Integer
Dim miSql as string
Set rst2 = currentdb.openrecordset("Tabla2")
'Si la tabla2 no tuviera registros sale del proceso
If rst2.recordcount=0 then goto Salida
'Nos movemos al primer registro
rst2.Movefirst
'Comenzamos el proceso de recorrido de registros
Do until rst2.EOF
vNum = rst2.Fields("NUM").value
vValor = rst2.Fields("VALOR").value
'Creamos una sql sobre la tabla 1 que nos filtre por NUM
miSql="SELECT * FROM Tabla1 WHERE [NUM]=" & vNum
'Creamos el recordset sobre la consulta
Set rst1 = currentdb.openrecordset(miSql)
'Si no hay coincidencias analizamos el siguiente registro
If rst1.Recordcount=0 then goto Siguiente
'Si hay coincidencia actualizamos el VALOR
With rst1
.Edit
.Fields("VALOR").value = vValor
.Update
End with
'Creamos la etiqueta Siguiente
Siguiente:
rst1.Close
Set rst1 = nothing
rst2.movenext
Loop
'Eliminamos los registros de la Tabla2
rst2.movefirst
Do until rst2.EOF
rst.Delete
rst.movenext
Loop
'Lanzamos un mensaje de que todo ha ido bien
msgbox "Proceso finalizado correctamente",vbInformation, "OK"
Salida:
rst2.Close
Set rst2 = nothing
End Sub
...
Tienes el código comentado, para que sepas lo que hace. He utilizado los mismos nombres de tablas y campos que me exponías en la consulta. Si fueran diferentes deberías cambiarlos en el código.
Te lo he escrito de cabeza. Si te sale algún problema me lo comentas y lo arreglamos.

Se quedo en
'Creamos el recordset sobre la consulta
Set rst1 = CurrentDb.OpenRecordset(miSql)
Presenta el siguiente error
No coinciden los tipos de datos en la expresión de criterios. (Error 3464)

El campo [NUM] de tu tabla, ¿es de tipo numérico?
Please, chequéalo y me dices cosas.

Como lo podría hacer si los campos no son numéricos EJ Texto o fecha
Me puedes ayudar como seria en los dos casos