Word non consente di modificare facilmente le posizioni predefinite in cui vengono stampati l’indirizzo del mittente e l’indirizzo principale su una busta. Esistono diversi modi per aggirare questo problema, ognuno dei quali esemplifica la natura flessibile di Word per eseguire un’attività.

Sembra che le impostazioni della busta siano memorizzate come parte del documento e quindi possano essere memorizzate in un modello. Se si stampa solo una dimensione della busta, il modo più semplice per modificare la posizione di stampa predefinita per le buste è seguire questi passaggi:

  1. Carica il modello Normal.dot. (Questo è il modello predefinito utilizzato da Word ogni volta che crei un documento vuoto.)

  2. Visualizza la finestra di dialogo Buste ed etichette. A tale scopo in Word 97 e Word 2000 scegliendo Strumenti | Buste ed etichette. Puoi farlo in Word 2002 e Word 2003 scegliendo Strumenti | Lettere e indirizzi | Buste ed etichette.

  3. Fare clic sulla scheda Buste. (Vedi figura 1.)

  4. Fare clic sul pulsante Opzioni. Word visualizza la finestra di dialogo Opzioni busta.

  5. Assicurati che la scheda Opzioni busta sia selezionata. (Vedi figura 2.)

  6. Negli appositi campi, modificare il posizionamento degli indirizzi, come desiderato.

  7. Fare clic su OK per chiudere la finestra di dialogo Opzioni busta.

  8. Fare clic su Aggiungi al documento. Questo inserisce una busta nel tuo modello (che hai aperto, ricordi?).

  9. Scegli Seleziona tutto dal menu Modifica. Ciò seleziona tutte le informazioni sulla busta che sono state appena aggiunte al documento da Word.

  10. Premi il tasto Canc. La busta viene rimossa dal documento.

  11. Salvare il modello facendo clic sullo strumento Salva o scegliendo Salva dal menu File.

  12. Chiudi il modello.

Ora, la prossima volta che utilizzi un documento basato sullo stile Normale, le impostazioni della busta rifletteranno quelle che hai creato in questi passaggi.

È inoltre possibile utilizzare una soluzione che utilizza una macro per creare le buste.

Ad esempio, puoi iniziare con un nuovo documento vuoto e creare una busta che sia proprio come vuoi che sia. Aggiungi questa busta al documento vuoto e quindi salvalo come modello utilizzando un nome descrittivo (come Envelope.dot). Quindi, crea la seguente macro e assegnala a un pulsante della barra degli strumenti:

Sub DoEnv()

Documents.Add Template:="Envelope", NewTemplate:=False     Selection.EndKey Unit:=wdStory     Selection.MoveLeft Unit:=wdCharacter, Count:=2     Selection.PasteSpecial DataType:=wdPasteText     Application.PrintOut Range:=wdPrintCurrentPage     ActiveWindow.Close (False)

End Sub

Per stampare una busta, evidenzia l’indirizzo in una lettera, quindi fai clic sul pulsante della barra degli strumenti a cui è associata questa macro. La macro copierà l’indirizzo negli Appunti, lo incollerà nella posizione corretta in un nuovo documento basato sul modello Busta, stamperà la busta e quindi chiuderà il documento busta senza salvarlo.

Un approccio diverso consiste nell’utilizzare una macro per impostare le impostazioni di inviluppo standard (ovvero quelle che si desidera utilizzare più spesso). La seguente macro farà proprio questo:

Sub ToolsEnvelopesAndLabels()

Dim EnvThere As Integer     Dim recipient As String     EnvThere = False     recipient = Selection.Text     On Error Resume Next     If IsError(ActiveDocument.Envelope.Address) Then         ActiveDocument.Envelope.Insert         EnvThere = True     End If     With ActiveDocument.Envelope         .DefaultFaceUp = True         .DefaultOrientation = wdCenterClockwise         .DefaultHeight = CentimetersToPoints(11)

.DefaultWidth = CentimetersToPoints(22)

.AddressFromLeft = CentimetersToPoints(5)

.AddressFromTop = CentimetersToPoints(5)

.ReturnAddressFromLeft = CentimetersToPoints(2)

.ReturnAddressFromTop = CentimetersToPoints(2)

End With     If EnvThere Then         ActiveDocument.Sections(1).Range.Delete     Else         ActiveDocument.Envelope.UpdateDocument     End If     With Application.Dialogs(wdDialogToolsCreateEnvelope)

.ExtractAddress = True         If .AddrText = "" Then             .AddrText = recipient         End If         .Show     End With End Sub

Per utilizzare questa macro, seleziona prima l’indirizzo che desideri utilizzare sulla busta. La macro acquisisce la selezione corrente e la utilizza come indirizzo della busta se non è già stato definito alcun altro indirizzo. Successivamente la funzione IsError determina se un inviluppo esiste già; in caso contrario, ne viene inserito uno nuovo e EnvThere è impostato per dirci di eliminarlo una volta modificate le proprietà predefinite. Una volta che una busta esiste nel documento, cambiamo le proprietà predefinite della busta.

Questa operazione viene eseguita nella sezione With ActiveDocument.Envelope. È possibile personalizzare queste proprietà secondo necessità o semplicemente ometterle. (Questo esempio usa la funzione CentimetersToPoints per impostare i valori; potresti usare altre funzioni come InchesToPoints, se lo desideri.) La macro finisce per visualizzare la finestra di dialogo Buste ed etichette in modo da poter apportare eventuali modifiche dell’ultimo minuto prima di stampare o creare il tuo Busta.

_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 (1824) si applica a Microsoft Word 97, 2000, 2002 e 2003. È possibile trovare una versione di questo suggerimento per l’interfaccia a nastro di Word (Word 2007 e più tardi) qui:

Default Envelope Margins.