SQL = "SELECT * FROM " & Combo.Text
rs.open SQL, ConexionBBDDOrigen
If Not rs.EOF Then
While Not rs.EOF
'Aquí otra sentencia SQL para ver si existe el registro o no existe en la tabla Destino
'según eso, Insertar o Modificar
rs.MoveNext
Wend
End If