Eine der Eigenschaften, die Sie in Word mit einem Dokument speichern können, ist ein Titel für das Dokument. Wenn Sie diese Eigenschaft regelmäßig mit Ihren neuen Dokumenten verwenden, können Sie eine Möglichkeit für Word erstellen, Ihr Dokument automatisch zu benennen, indem Sie den von Ihnen angegebenen Titel anzeigen.

Dieses spezielle Makro eignet sich gut für die Verwendung mit Buchstaben, obwohl es für andere Dokumenttypen leicht geändert werden kann. Das Makro heißt FileSaveAs und ersetzt daher den integrierten Befehl Speichern unter. Der beste Ort zum Speichern dieses Makros ist die Vorlage, die Sie für Ihre Briefe verwenden:

Sub FileSaveAs()

Dim MyDocTitle As String     MyDocTitle = Format(Date, "yymmdd") + " letter"



Selection.HomeKey Unit:=wdStory     Selection.Find.ClearFormatting     With 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

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

With Dialogs(wdDialogFileSummaryInfo)

.Title = MyDocTitle         .Execute     End With

Dialogs(wdDialogFileSaveAs).Show End Sub

Beachten Sie, dass dieses Makro nur dann ordnungsgemäß funktioniert, wenn Sie zum ersten Mal ein neues Dokument speichern. Wenn Sie es mit einem vorhandenen Dokument verwenden (eines, das zuvor unter einem anderen Namen gespeichert wurde), wird der ursprüngliche Name im Dialogfeld Speichern unter weiterhin als Standard vorgeschlagen, obwohl der Dokumenttitel geändert wird.

Das Makro kann einer Symbolleistenschaltfläche oder einer Menüoption zugewiesen werden, sodass Sie Ihre Dokumente speichern und automatisch benennen können.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (1693) gilt für Microsoft Word 97, 2000, 2002 und 2003. Sie finden eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Word (Word 2007) und später) hier:

Ein automatischer Dateiname.