Un Nome file automatico

Una delle proprietà che Word consente di salvare un documento è un titolo per il documento. Se si utilizza questa proprietà regolarmente con i nuovi documenti, è possibile creare un modo per Word per citarne automaticamente il documento, cercando il titolo che hai fornito.

Questa macro particolare è particolarmente adatto per l'utilizzo con le lettere, anche se potrebbe essere facilmente modificato per altri tipi di documenti. La macro si chiama FileSaveAs, in modo che sostituisce il built-in comando Salva con nome. Il posto migliore per salvare questa macro è nel modello da utilizzare per le vostre lettere:

FileSaveAs Sub ()
Dim MyDocTitle As String
MyDocTitle = Format (data, "aammgg") + "lettera"

Selection.HomeKey Unità: = wdStory
Selection.Find.ClearFormatting
Con Selection.Find
.Text = "^ PDear"
.Replacement.Text = ""
.forward = True
.Wrap = WdFindContinue
.format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute

Se Selection.Find.Found Poi
Selection.MoveRight Unità: = wdCharacter, Count: = 1
Selection.EndKey Unità: = wdLine, Extend: = wdExtend
Selection.MoveLeft Unità: = wdCharacter, Count: = 2, Extend: = wdExtend
Se Len (Selection.Text)> 1 Poi
MyDocTitle = MyDocTitle + "a" + Selection.Text
End If
End If

Con Dialogs (wdDialogFileSummaryInfo)
.title = MyDocTitle
.Execute
End With

Dialogs (wdDialogFileSaveAs) .Show
End Sub

Si noti che questa macro funziona correttamente solo quando si sono prima salva un nuovo documento. Se lo si utilizza con un documento esistente (uno salvato in precedenza con un altro nome), il nome originale è ancora proposto come predefinito nella finestra di dialogo Salva, anche se il titolo del documento viene modificato.

La macro può essere assegnata a un pulsante della barra degli strumenti o una voce di menu in modo da poter salvare i documenti e il nome automaticamente.

WordTips è la vostra fonte per la formazione Microsoft Word conveniente. (Microsoft Word è il più popolare software di elaborazione testi del mondo.) Questa punta (10358) si applica a Microsoft Word 2007 e il 2010. Si può trovare una versione di questo suggerimento per l'interfaccia del menu precedente di Word qui: un nome di file automatico.