Gli utenti di WordPerfect potrebbero avere familiarità con la funzionalità che consente di stampare il contenuto di una directory. In effetti, può essere molto utile avere una stampa di tutti i documenti in una directory. Sfortunatamente, Word non dispone di un comando intrinseco che ti consente di eseguire la stessa operazione. Tuttavia, ci sono un paio di modi per affrontare questo problema.

Il primo è il vecchio metodo DIR collaudato, che è stato utilizzato dai “tecnici” fin dai tempi del DOS. Apri semplicemente un prompt dei comandi (MS-DOS)

, individua la directory per la quale desideri un elenco, quindi digita il seguente comando:

dir /b > mydir.txt

Questo crea un file di testo (mydir.txt) che contiene solo i nomi dei file nella directory. È quindi possibile individuare il file in Word e caricarlo come documento. Sebbene questo approccio non sia un singolo passaggio, non è nemmeno particolarmente difficile.

Se desideri una soluzione macro al problema, puoi utilizzare quanto segue. Visualizza la finestra di dialogo Apri standard, in cui è possibile cercare la directory per la quale si desidera un elenco. Quando si seleziona un file in quella directory e si fa clic su Apri, la macro crea un nuovo documento di Word che elenca tutti i file contenuti nella directory. Notare che è necessario selezionare un file dalla directory.

Sub ListFiles()

Dim PathWanted As String     Dim Temp As String     Dim i As Integer

With Dialogs(wdDialogFileOpen)

.Name = "."

If .Display = -1 Then             Documents.Add             PathWanted = Options.DefaultFilePath(wdDocumentsPath)

Selection.TypeText "Files in " & PathWanted & ":" & vbCrLf             With Application.FileSearch                 .LookIn = PathWanted                 .FileName = "."

If .Execute > 0 Then                     For i = 1 To .FoundFiles.Count                         Temp = .FoundFiles(i)

While InStr(Temp, "\") > 0                             Temp = Mid(Temp, InStr(Temp, "\") + 1)

Wend                         Selection.TypeText Temp & vbCrLf                     Next                 End If             End With         End If     End With End Sub

Se si desidera limitare i file restituiti dalla macro (ad esempio, solo a quelli che terminano con .DOC), è possibile modificare le specifiche del file (“.”) In due delle righe del programma.

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