Quiero quitar todas las barras de herramientas de un libro de Excel 2016, solo de ese libro.

Quiero quitar todas las barras de herramientas de un libro de Excel 2016, solo de ese libro, aunque trabaje paralelamente con otro libro, que éste si tendría las barras y que me permita copiar celdas de un libro a otro indistintamente. Pero, aparte de quitar las barras en todos los libros abiertos paralelamente a éste, tampoco me permite copiar celdas de otros libros abiertos y pegarlas en el libro que no tiene barras.

En ThisWorkbook he puesto el siguiente código

Private Sub Workbook_Activate()
nomuestra
End Sub

___________________________________________________________________

En un Módulo he puesto los siguientes códigos

Sub Muestra()
Application.DisplayFormulaBar = True
Application.DisplayStatusBar = True
Application.displayfulscreen = False
ExecuteExcel4Macro ("show.toolbar(""ribbon"",1)")
With ActiveWindow
.DisplayHeadings = True
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
.DisplayGridlines = True
End With
End Sub

______________________________________________________________
Sub nomuestra()
Application.DisplayFormulaBar = False
ExecuteExcel4Macro ("show.toolbar(""ribbon"",0)")
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
.DisplayGridlines = False
End With
End Sub

_____________________________________________________________