Periodicamente, esamino i file nelle mie directory di Word per determinare se uno qualsiasi dei vecchi documenti può essere eliminato in sicurezza. Molte volte, è necessario aprire il file per esaminarlo prima di poter stabilire se è necessario eliminarlo.

Ovviamente, Word ti consentirà di eliminare un file elencato nelle finestre di dialogo Apri o Salva, ma non eliminerà il documento attivo, quello aperto al momento corrente. Anziché chiudere il documento attivo e quindi eliminarlo aprendo le finestre di dialogo Apri o Salva, utilizzo la seguente macro per eliminare un file aperto.

Sub DeleteThisFile()

Dim MyFile As String

MyFile = ActiveDocument.Path & "\" & ActiveDocument.Name     If MsgBox(MyFile & " will be deleted permanently", _       vbYesNo, "Delete this File?") = vbYes Then         ActiveDocument.Close (wdDoNotSaveChanges)

Kill MyFile     End If End Sub

La macro richiede di assicurarsi che si desidera eliminare il file e (se lo si fa) chiude il documento senza salvarlo e quindi lo elimina.

Si noti che il file non va nel Cestino, ma viene immediatamente eliminato.

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

Eliminazione del file documento aperto.