Hola, para ocultar la cinta de opciones en el libro activo he utilizado el siguiente código, no obstante, aunque me permite pegar datos copiados entre hojas del mismo libro en las celdas desbloqueadas, cuando copio datos de otro libro se deshabilita las opciones de pegado.

Private Sub Workbook_Activate()
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
End Sub

Os agradezco vuestra ayuda, muchas gracias.

Hola

En muchos casos las macros eliminan lo copiado en el portapapeles, creo recordar que eso ocurre, sobre todo, cuando se cambian propiedades de los objetos como el caso que estás mostrando ya que ocultas la Cinta de Opciones, cada vez que activas el libro respectivo.