Copiar y pegar contenido de un campo (foto) de un subformulario a otro

Buenas.

Tengo un pequeño problemilla, he creado un formulario que contiene dos subformularios.

El subformulario A esta basado en una tabla donde uno de sus campos es del tipo objeto OLEdependiente (cada registro posee su foto) y digamos que es la tabla donde almaceno todas las fotos.

El subformulario B esta basado en otra tabla, y tiene varios campos también del mismo tipo OLEDependiente (cada registro puede contener varias fotos).

Lo que pretendo es que al hacer click sobre el campo OLEDependiente del subformulario B quede pegado el contenido en ese momento activo del campo OLEDependiente del subformularioA.

¿Es esto posible?.

He probado con:

Private Sub Foto_Click()
Me.Foto.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, acCopy, , acMenuVer70

(Para copiar el contenido del campo OLEDependiente del subformulario A

Y

Private Sub OLEDependiente116_Click()

Me.OLEDependiente116.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, acPaste, , acMenuVer70

(para pegarlo en el campo OLEDependiente del subformulario B)

Pero aunque puedo ver que efectivamente se pega el contenido pero, inmediatamente me sale:

"Se ha producido el error 2115 en tiempo de ejecución

La macro o función establecida para propiedad ReglaDeValidación o AntesDeActualizar de este campo impide que la base de datos guarde los datos del campo"

Entonces me remite al depurador y me resalta la línea:

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Si opto solo por eliminar esta línea y quedarme solo con:

DoCmd.DoMenuItem acFormBar, acEditMenu, acPaste, , acMenuVer70

Entonces me sale:

"Se ha producido el error 2046 en tiempo de ejecución

La Acción o Comando Pegar no está disponible ahora.

¿Me podéis ayudar?. Gracias