Aprire un nuovo file di Visual Basic e di iniziare una nuova subroutine utilizzando il seguente codice:
Sub RemoveToolbars ( ) economici 2
Definire quando le barre degli strumenti deve essere rimosso e in quali condizioni , per esempio : . .
On Error Resume Torna
Con Application
DisplayFullScreen = True
CommandBars ( " Full Screen " ) . Visible = False
. CommandBars ( " ExampleToolbarItemName " ) . CommandBars Enabled = True
. ( " ExampleToolbarItemName2 " ) . Enabled = True
l'aggiunta di "On Error Resume Back" costringerà l'applicazione per riprendere al suo stato iniziale, non modificato , se dovesse riscontrare eventuali errori. Cambia " ExampleToolbarItemName " e " ExampleToolbarItemName2 " per i nomi degli elementi della barra degli strumenti che si desidera modificare , ad esempio "Modifica" o " Format ".
3
Chiudere la sub- routine con il seguente codice :
End With
On Error GoTo 0
End Sub
software © www.354353.com