Constulta traspaso

Hola , saludos a todos.

Quiero hacer una consulta para actualizar los datos de una tabla a otra ,
los campos son en la tabla A) Id_Codigo y Numero (esta tabla contiene los
datos que quiero pasar) y la tabla B)Tiene varios campos pero coinciden los
datos de la primera en el Id_Codigo lo que quiero cambiar son el campo
Numero.
Yo creia que con la siguiente Select funcionaria pero ha puesto el mismo
codigo en todos los campos Numero.

Update TablaB
Set Numero=(Select TablaA.Numero from tablaB , TablaA
where TablaA.IdCodigo=TablaB.IdCodigo)

Pero claro solo selecciona el registro uno de la tablaB

Bueno gracias desde ya por haber leido el email , un saludo