Ci sono momenti in cui Larry ha assolutamente bisogno di creare quattro o più nuovi documenti vuoti. Si chiede se esiste un modo per creare quattro nuovi documenti vuoti (sarebbe bello inserire quanti documenti vuoti sono necessari) contemporaneamente.

Ci sono alcuni modi per affrontare questo problema. Se tutto ciò che vuoi fare è creare quattro nuovi documenti, tutti basati sul modello Normale, il modo più semplice è premere semplicemente Ctrl + N quattro volte. (In realtà, puoi tenere premuto il tasto Ctrl e premere N quattro volte.) Il risultato sono quattro documenti vuoti, pronti per essere utilizzati.

Se i tuoi documenti devono essere basati su un modello diverso dal modello Normale, è meglio usare una macro. La macro seguente richiede all’utente quanti documenti devono essere creati e quindi li crea in base al modello BusinessReport.

Sub NewDocuments()

Dim Answer As Variant     Dim iNewDocs As Integer     Dim J As Integer

Answer = InputBox("How many new documents?")

iNewDocs = CInt(Answer)

For J = 1 to iNewDocs         Documents.Add Template:="BusinessReport", NewTemplate:=False, _           DocumentType:=wdNewBlankDocument     Next J End Sub

La macro può essere assegnata a un tasto di scelta rapida o a un pulsante su una barra degli strumenti, pronta per creare i tuoi documenti. Puoi anche adottare un approccio leggermente diverso con lo stesso codice. Crea un nuovo documento basato sul modello desiderato (come il modello BusinessReport), quindi aggiungi questa macro al modello:

Sub AutoOpen()

Dim Answer As Variant     Dim iNewDocs As Integer     Dim J As Integer

Answer = InputBox("How many more docs?", "Doc Count")

iNewDocs = CInt(Answer)

For J = 1 To iNewDocs         Documents.Add Template:="BusinessReport", NewTemplate:=False, _           DocumentType:=wdNewBlankDocument     Next End Sub

Salvare il documento con un nome come “MultipleDocs.docm”. La base della macro è la stessa della precedente. La differenza è il nome dato alla macro. Poiché utilizza il nome speciale AutoOpen, ogni volta che il documento MultipleDocs viene successivamente aperto, la macro viene eseguita automaticamente e all’utente viene chiesto quanti documenti aggiuntivi creare.

_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.

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

(Microsoft Word è il software di elaborazione testi più popolare al mondo.) Questo suggerimento (11237) si applica a Microsoft Word 2007, 2010, 2013, 2016, 2019 e Word in Office 365. Puoi trovare una versione di questo suggerimento per vecchia interfaccia del menu di Word qui: