Supportnet / Forum / Textverarbeitung

Hallo Leute, ich suche die Lösung zu folgendem Problem: In einer WinWord-Vorlage habe ich Makros, die beim Öffnen der Vorlage die Benutzer einige Fragen zur Dokumentenverschlagwortung stellen. Das ergibt dann insgesamt als Ergebnis vier Variablen (=Textmarken), aus denen ich eine Dokumentencodierung erzeuge. Klappt auch alles ganz gut, nur.... ich möchte, dass das neue Dokument nach Abschluss der automatischen Abfrage nach der Dokumentencodierung umbenannt wird. Beispiel: Textmarke1="Hallo", Textmarke2="Hilfe", durch Makro Umbenennung des Dokumentes von "Dokument1" in "HalloHilfe". Geht das, kann mir jemand einen Tipp geben. Habe in der WinWord Hilfe keinen Hinweis gefunden, ob ich per Makro den Dateinamen beeinflussen kann. Gruß Moritz

Ginge ungefähr so:

Sub Speichern()
Dateiname$ = ActiveDocument.Bookmarks("Marke1").Range & _
             ActiveDocument.Bookmarks("Marke2").Range & _
             ".doc"
ActiveDocument.SaveAs FileName:=Dateiname$
End Sub

Ich hab jetzt hier keine weiteren Fehlerprüfungen oder Optionen reingenommen. In der VBA-Hilfe findest du alles zum "SaveAs"-Befehl.

[gau]

Hallo [gau],

vielen Dank, dass hat sofort geklappt... jetzt habe ich nur noch ein weiteres Problem: Ich habe mich in meiner ursprünglichen Nachricht falsch ausgedrückt: Deine Lösung vergibt einen neuen Dateinamen UND speichert sofort in dem aktuellen Verzeichnis. Tatsächlich will ich aber nur, dass der neue Dateiname vergeben werden soll, also ohne sofortiges Speichern. Dass soll der User selber auslösen und vorher noch das richtige Verzeichnis auswählen.
Oder mit anderen Worten: "Wie kann ich das Menü "Speichern unter..." mit dem bereits geänderten Dateinamen öffnen, ohne dass sofot gespeichert wird, so dass der User noch ein Verzeichnis wählen und selber [OK] klicken muss?"

Hoffe, Du weißt wieder so schnell Rat...

Moritz

• Absatzeinstellung in Winword
• OpenOffice - PDF erzeugen mit Lesezeichen
• Aktualisierung von Feldern
• Dateiname ungültig