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 su 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 coinvolge l’impostazione Zoom sulla barra degli strumenti Formattazione o usando la rotellina di scorrimento del mouse. (Su alcuni sistemi potrebbe essere necessario tenere premuto il tasto Ctrl in modo che la rotella di scorrimento regoli il fattore di 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.

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

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

Questo suggerimento (2668) si applica a Microsoft Excel 97, 2000, 2002 e 2003. Puoi trovare una versione di questo suggerimento per l’interfaccia a nastro di Excel (Excel 2007 e versioni successive) qui:

Sempre aperto al 100% di zoom.