Donna è incaricata di preparare un documento che verrà utilizzato in tutta la sua azienda. Vorrebbe che il documento, una volta aperto, “minimizzasse” il nastro nella parte superiore dello schermo e poi, una volta chiuso, riportasse il nastro allo stato di “pre-apertura”. Ciò verrebbe fatto per fornire l’area massima dello schermo per il documento. Donna pensa che ci vorrà una macro per essere eseguita, ma non è sicura di quali comandi usare per portare a termine l’operazione.

C’è un’incredibile carenza di informazioni disponibili sull’utilizzo della barra multifunzione in VBA. In effetti, l’unico metodo che siamo stati in grado di individuare che minimizzerà il nastro è il seguente:

ActiveWindow.ToggleRibbon

Questo metodo equivale a premere Ctrl + F1. Alterna la barra multifunzione, cambiandola da ingrandita a ridotta a icona e viceversa. Questo, ovviamente, non è ciò che Donna vuole fare; vuole assicurarsi che sia ridotto al minimo. Utilizzando il metodo ToggleRibbon, puoi “confondere” un modo per capire se il nastro è ridotto a icona o meno. Considera le seguenti macro di esempio.

Dim w As Variant Dim h1 As Long Dim h2 As Long Dim StartedWithRibbon As Boolean

Private Sub Document_Open()

Set w = ActiveWindow     h1 = w.UsableHeight     w.ToggleRibbon     h2 = w.UsableHeight     If h1 < h2 Then         StartedWithRibbon = False     Else         StartedWithRibbon = True         w.ToggleRibbon     End If End Sub
Private Sub Document_Close()

Set w = ActiveWindow     h1 = w.UsableHeight     w.ToggleRibbon     h2 = w.UsableHeight     If h2 < h1 Then         If StartedWithRibbon Then w.ToggleRibbon     Else         If Not StartedWithRibbon Then w.ToggleRibbon     End If End Sub

In realtà ci sono due macro qui, una attivata automaticamente quando un documento viene aperto e l’altra attivata quando viene chiuso. Le macro verificano l’altezza della finestra attiva, memorizzandola nella variabile h1. Quindi attiva la barra multifunzione e controlla di nuovo l’altezza della finestra attiva, memorizzandola in h2. Confrontando i due valori, è possibile determinare se la barra multifunzione è ridotta a icona o meno e quindi agire di conseguenza.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti WordTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

WordTips è la tua fonte di formazione economica su Microsoft Word.

(Microsoft Word è il software di elaborazione testi più popolare al mondo.) Questo suggerimento (8515) si applica a Microsoft Word 2007, 2010, 2013, 2016, 2019 e Word in Office 365.