Se lavori con cartelle di lavoro su cui hanno lavorato per la prima volta i tuoi colleghi, potresti essere frustrato dal fattore di zoom applicato a quelle cartelle di lavoro da quegli altri. Ad esempio, se la tua collega (Wanda) ha un monitor enorme, non sarebbe raro per lei ridurre il fattore di zoom di Excel al 75% o addirittura al 60%. Lo scopo, ovviamente, è che non sia sopraffatta da cose che sembrano molto grandi con il fattore di zoom completo.

Il problema è che il fattore di zoom viene salvato con la cartella di lavoro. Pertanto, quando Wanda salva la cartella di lavoro e te la passa, quando la apri, la cartella di lavoro viene comunque visualizzata con qualsiasi fattore di zoom Wanda utilizzato per ultimo.

Se non hai lo stesso monitor di dimensioni di Wanda, la cartella di lavoro potrebbe essere quasi illeggibile sul tuo sistema.

Ci sono solo due possibili soluzioni a questo problema. Innanzitutto, puoi semplicemente regolare il fattore di zoom una volta aperta la cartella di lavoro. Ci sono molti modi per farlo, ma il più semplice consiste nell’usare il controllo Zoom sul lato destro della barra di stato. È possibile fare clic sul punto centrale del dispositivo di scorrimento Zoom e tornare rapidamente al 100% oppure fare clic sulla percentuale accanto al dispositivo di scorrimento per visualizzare la finestra di dialogo Zoom.

La seconda soluzione è creare una macro che viene salvata con la cartella di lavoro. La macro può essere eseguita ogni volta che viene aperta la cartella di lavoro e quindi impostare il fattore di zoom. (Questa macro dovrebbe essere aggiunta alla finestra del codice di questa cartella di lavoro nell’editor VBA.)

Private Sub Workbook_Open()

ActiveWindow.Zoom = 100 End Sub

L’unico problema con una macro come questa, ovviamente, è che ogni volta che Wanda (la tua collega) apre la cartella di lavoro sul suo sistema, viene impostato anche il fattore di zoom e lei si sentirà frustrata con te come lo eri con lei.

Forse una soluzione è creare una macro più complessa, che controlli la risoluzione dello schermo corrente e quindi imposta il fattore di zoom di conseguenza.

Ad esempio, la seguente macro potrebbe essere utilizzata per effettuare le regolazioni in base alla risoluzione:

Declare Function GetSystemMetrics32 Lib "user32" _     Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long

Public Sub ScreenRes()

Dim lResWidth As Long     Dim lResHeight As Long     Dim sRes As String

lResWidth = GetSystemMetrics32(0)

lResHeight = GetSystemMetrics32(1)

sRes = lResWidth & "x" & lResHeight     Select Case sRes         Case Is = "800x600"

ActiveWindow.Zoom = 75         Case Is = "1024x768"

ActiveWindow.Zoom = 125         Case Else             ActiveWindow.Zoom = 100     End Select End Sub

Questa routine controlla la risoluzione dello schermo e regola la finestra di conseguenza. Altre risoluzioni e zoom possono essere aggiunti facilmente. Per fare in modo che la routine venga eseguita automaticamente, usa semplicemente un gestore di eventi Workbook_Open nella finestra del codice Questa cartella di lavoro per attivare la macro:

Private Sub Workbook_Open()

ScreenRes End Sub

_Nota: _

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

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (11551) si applica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 ed Excel in Office 365. Puoi trovare una versione di questo suggerimento per la vecchia interfaccia del menu di Excel qui: