Feld als Dateinamen - WORD

Question

Ja wie schafft man es z.B. mit einer Feldfunktion den Dateinamenvorschlag beim Speichern-Dialog zu ändern (gespeichert werden soll eine Zahlenkombination). Standardmäßig nimmt Word ja die ersten Wörter im Dokument.

BerchGerch · Accepted Answer

Hallo,

ich schreibe dir jetzt nochmal eine neue Antwort, damit ich dir ein Video anhängen kann.

Hinweis: Um dich damit vertraut zu machen, wo und wie du Makros einfügen kannst, würde ich dir auf jeden Fall empfehlen, das angehängte Video anzuschauen, da du ja geschrieben hast, dass du dich mit Makros nicht so auskennt.

Um als Dokumentnamen im Speicherndialog die Rechnungsnummer vorgeben zu lassen, gehe bitte so vor, wie im Folgenden beschrieben.

1. Schritt: Der Rechnungsnummer in der Vorlage eine Textmarke zuweisen

Öffne die Dokumentvorlage, auf deren Grundlage die Rechnung erstellt wird (also bitte nicht nur ein Dokument öffnen), so dass du die Vorlage direkt bearbeiten kannst.
Markiere in der Vorlage die Rechungsnummer von der ersten bis zur letzten Ziffer oder das entsprechende Feld  und gehe im Register Einfügen in der Gruppe Hyperlinks auf Textmarke.
Gebe in dem sich neu öffnenden Fenster als Textmarkenname den Namen Rechnungsnummer ein.Hinweis: Du musst genau diesen Textmarkennamen verwenden, da das Makro damit arbeitet. Wenn du einen anderen Namen bei der Textmarke verwendest, musst du in der Zeile DocName = .Bookmarks("Rechnungsnummer").Range.Text des Makros anstatt Rechungsnummer den Namen deiner Textmarke zwischen die Anführungszeichen schreiben und die Anführungszeichen unbedingt beibehalten.
Wenn du im Fenster Textmarke den Namen Rechnungsnummer eingegeben hast, klicke rechts auf Hinzufügen, damit deine Textmarke gesetzt wird.
2. Schritt: Die angehängten Makros in die Vorlage einfügen

Aktiviere die Entwicklertools-Registerkarte. Wie das geht erfährst du im angehängten Video.
Wenn du die Entwicklertools-Registerkarte aktiviert hast, klicke in dieser ganz links in der Gruppe Code auf die Schaltfläche Visual Basic. Es öffnet sich ein neues Fenster.
Falls in diesem Links unten das Eigenschaften-Fenster nicht angezeigt wird, klicke auf Ansicht → Eigenschaftenfenster oder drücke einfach F4, wenn du dich im Visual-Basic-Fenster befindest.
Klicke als nächstes UNBEDINGT ZUERST links im Projekt-Explorer auf Project (DeinVorlagenname).
Klicke jetzt oben in der Menüleiste auf Einfügen → Modul. In der Projektvorlage wird im Projekt-Explorer automatisch ein neuer Ordner mit dem Namen Module erstellt, in dem ein neues Modul mit dem Namen Modul1 erstellt wird.
Klicke dieses Modul DOPPELT an, damit du in dieses Modul wechselst.
Ich würde dir empfehlen, dass du das Modul unten im Eigenschaftenfenster im Feld (Name) noch in mdlSpeicherdialoge umbenennst. Das musst du nicht machen. Du kannst dem Modul auch jeden anderen Namen geben (bitte dabei keine Umlaute, Sonderzeichen und Leerzeichen verwenden) oder Modul1 lassen. Dass man vor die Modulnamen das Kürzel mdl schreibt ist nur eine Konvention, damit man gleich am Namen erkennt, dass es sich um ein "normales" Modul handelt.
Wenn du dem Modul also eventuell einen neuen Namen gegeben hast, klicke rechts in den Codebereich. Jetzt erst wird der Name des Moduls geändert.
Hier füge jetzt den folgenden Code ein (also ganz normal kopieren und dann in den Codebereich einfügen). Es handelt sich genauer gesagt um zwei verschiedene Makros, die deine Speicherdialoge (Speichern und Speichern unter...) bei allen Dokumenten, die auf deiner Rechnungsvorlage basieren, dahingehend verändern, dass sie als Speichernamen die Rechnungsnummer, die sich in der Textmarke Rechnungsnummer befindet, benutzen. Das passiert automatisch, sobald du den Speichern-Dialog auslöst, du musst also die Makros nicht extra ausführen.
Würde sich keine Textmarke Rechnungsnummer im Dokument befinden, würden die Makros den jeweils aktuellen Dokumentnamen als Speichernamen benutzen.
Als letztes musst im Visual Basic-Fenster einmal auf Datei → DeinVorlagenname speichern gehen, damit der Makrocode gespeichert wird.
Anschließend musst du noch die Veränderungen an der Vorlage einmal abspeichern, damit auch deine Textmarke in der Vorlage gespeichert wird.
Hier jetzt noch der Code des Makros:

Sub FileSave()

If ActiveDocument.Path = "" Then
        FileSaveAs
        Exit Sub
    End If
    ActiveDocument.Save

End Sub
Sub FileSaveAs()

Dim DocName As String

If ActiveDocument.Bookmarks.Exists("Rechnungsnummer") = True Then
        DocName = ActiveDocument.Bookmarks("Rechnungsnummer").Range.Text
    Else
        DocName = ActiveDocument.Name
    End If

With Dialogs(wdDialogFileSaveAs)
        .Name = DocName
        .Show
    End With

End Sub

Ergebnis

Hast du alles richtig gemacht, befindet sich jetzt in deiner Dokumentvorlage eine Textmarke mit dem Namen Rechnungsnummer, die auf die Rechnungsnummer verweist und die Speicherdialoge wurden dahingehend geändert, dass sie dir automatisch die jeweilige Rechungsnummer vorschlagen.

Wenn du noch Fragen hast, melde dich ruhig nochmal.

BerchGerch · Answer

Hallo,

der einzige Weg den Standardnamen für Worddokumente zu ändern, sieht so aus, dass man den Titel in den Details der Normalvorlage ändert.

Suche dafür die Normalvorlage für Word (Normal.dotm) unter Windows. Sie befindet sich standardmäßig im Ordner

C:\Benutzer\ [Dein Benutzername] \AppData\Roaming\Microsoft\Templates.

Hinweis: Der Ordner AppData ist ein versteckter Ordner und daher standardmäßig unsichtbar. Um diesen sichtbar zu machen, klickst du im Windows-Explorer oben in der Menüleiste auf Organisieren → Ordner- und Suchoptionen.

Dort wechselst du auf die Registerkarte Ansicht und scrollst die Erweiterten Einstellungen nach unten. Hier stellst du bei den Versteckten Dateien und Ordnern die Auswahl auf Ausgeblendete Dateien, Ordner und Laufwerke anzeigen um (→ Bild 1). Jetzt solltest du den AppData-Ordner sehen und anwählen können.

Im Templates-Verzeichnis angekommen klickst du jetzt mit der rechten Maustaste auf die Normal.dotm und wählst im Kontextmenü Eigenschaften.

Wechsele hier in die Registerkarte Details und trage unter Titel die gewünschte Zahlenkombination ein (→ Bild 2).

Anschließend wird Word bei allen Dokumenten, die auf dieser Vorlage basieren, beim Speichern die eingetragene Zahlenkombination verwenden.

Soweit die Lösung deines Problems, solange es sich immer um dieselbe Zahlenkombination handelt, die zunächst beim Speichern verwendet werden soll.

Wenn du eine dynamische Zahlenkombination willst, weiß ich (noch) nicht, wie und ob das überhaupt möglich ist. Eventuell könnte man das mithilfe eines Makros bewerkstelligen, aber dafür müsste ich mich nochmal schlau machen.

Sag bitte Bescheid, wenn du weitere Hilfe brauchst.

Gruß, BerchGerch

Feld als Dateinamen - WORD

2 Antworten