Condividere una cartella di lavoro di Excel con un gruppo significa anche essere coinvolti con diverse stampanti, diversi PC e diversi requisiti e aspettative degli utenti. Questo non è più evidente quando si tratta di stampare un foglio di lavoro. Ovviamente utenti diversi hanno PC diversi e possono avere stampanti diverse, quindi i risultati stampati possono variare da un utente all’altro. Inoltre, utenti diversi possono modificare gli intervalli di stampa in ciò che viene prodotto da un foglio di lavoro.

Se sei responsabile di un particolare foglio di lavoro, potresti voler proteggere in qualche modo le varie impostazioni di stampa che hai stabilito in modo che non vengano alterate da altri utenti. Forse il modo più semplice per farlo è salvare le impostazioni di stampa in una macro e quindi eseguire quella macro ogni volta che la cartella di lavoro viene chiusa. In questo modo, le impostazioni possono essere ripristinate ai “valori predefiniti” specificati, senza preoccuparsi che gli utenti li rovinino tutti.

Ad esempio, la seguente macro mostra come impostare tutte le impostazioni di stampa per un particolare lavoro di stampa:

Sub Auto_Close()

With ActiveSheet.PageSetup         .LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = ""

.RightFooter = ""

.LeftMargin = Application.InchesToPoints(1)

.RightMargin = Application.InchesToPoints(1)

.TopMargin = Application.InchesToPoints(1)

.BottomMargin = Application.InchesToPoints(1)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.PrintHeadings = False         .PrintGridlines = False         .PrintComments = xlPrintNoComments         .CenterHorizontally = False         .CenterVertically = False         .Orientation = xlPortrait         .Draft = False         .PaperSize = xlPaperLetter         .FirstPageNumber = xlAutomatic         .Order = xlDownThenOver         .BlackAndWhite = False         .Zoom = False         .FitToPagesWide = 1         .FitToPagesTall = 99         .PrintErrors = xlPrintErrorsDisplayed         .PrintArea = "MyPrintArea"

.PrintTitleRows = ""

.PrintTitleColumns = ""

End With End Sub

Per fare in modo che la macro funzioni per le tue esigenze particolari, modifica semplicemente le impostazioni per soddisfare le tue esigenze.

Ovviamente, quando qualcun altro apre la tua cartella di lavoro, la macro potrebbe essere disabilitata automaticamente o potrebbero vedere una notifica che ci sono macro in essa. Se scelgono di disabilitare le macro, la macro delle impostazioni predefinite non verrà eseguita alla chiusura della cartella di lavoro. La soluzione, ovviamente, consiste nell’aprire la cartella di lavoro, abilitare le macro e quindi chiudere la cartella di lavoro. Questo esegue la macro e le tue impostazioni vengono nuovamente ripristinate come desideri.

_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 (2993) 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:

Protezione delle impostazioni di stampa.